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ABSTRACT 

This  study  investigates  the  maneuvering  of  ships  in- 
volved in  the  replenishment  at  sea  operation  under  calm 
water  conditions. 

Two  sets  of  linear  differential  equations  of  motion 
of  a  ship  in  three  degrees  of  freedom  are  implemented  for 
an  analog— digital  simulation  (hybrid  operation) .   Mainly 
a  two  phase  hybrid  simulation  is  carried  out. 

In  the  first  part  the  real— time  dynamic  response  of 
a  single  ship  is  obtained.   Small  perturbations,  result- 
ing from  small  changes  in  rudder  angle  and  propeller  RPM, 
are  studied. 

In  the  second  part  interaction  forces  and  moments 
are  applied  only  to  the  leading  ship  as  it  is  overtaken 
by  the  tracking  ship.   Thus  the  response  of  the  leading 
ship  is  of  primary  interest  on  this  phase. 

Finally  interaction  forces  and  moments  are  applied 
to  both  leading  and  tracking  ship.   Thus  the  complete 
response  of  the  UNREP  operation  is  obtained. 
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I.   INTRODUCTION 

At  the  present  time  the  operational  procedure  of  re- 
plenishment at:  sea  underway  is  described  by  two  manuals 
of  the  Department  of  the  Navy  [1]  and  [2] .   This  procedure 
includes  collision  hazard.   Therefore  an  analysis  of  the 
replenishment  operations  may  provide  a  mean  for  improve- 
ment of  ship  maneuvering  and  ship  control.   The  maneuver 
of  replenishment  at  sea  involves  six  factors:   course, 
speed,  distance  between  ships,  the  approach,  station  keep- 
ing and  departure. 

This  thesis  describes  the  analysis  of  underway  replen- 
ishment (UNREP)  using  an  analog  computer  simulation.   This 
analog  computer  simulation  model  will  describe  two  Mariner 
Class  merchant  ships.   An  effort  is  made  to  define  the 
control  parameters  necessary  to  provide  information  for 
the  conning  officer  and/or  helmsman  which  will  increase 
the  safety  conditions  of  the  UNREP  operation.   According 
to  the  tactical  requirements  the  UNREP  operation  is  inter- 
preted as  follows: 

a.  The  replenishing  (leading)  ship  is  responsible 
for  course  keeping  only. 

b.  The  receiving  (tracking)  ship  is  responsible  for 
both  course  and  station  (distance  between  ships) 
keeping. 

For  this  reason  one  ship  is  constrained  to  move  in  a 

straight  line  course  at  constant  speed.   The  rudder  and 


propeller  of  the  second  ship  are  controlled  in  order  to 
keep  it  in  a  parallel  course  relative  to  the  first  ship. 
The  analog  computer  output  is  presented  and  analyzed 
to  determine  the  necessary  information  for  the  ship  con- 
trol parameters  required  during  these  simulated  UNREP 
operations . 


II.   INTERACTION  EFFECTS 

When  underway,  the  pressure  distribution  on  the  ship 
hull  varies  (as  is  shown  in  Figure  1)  due  to  the  variable 
velocity  of  the  water  flow,  the  so— called  venturi  effect. 


pfFSSUfiF  ARC* 

Figure  1.   Pressure  distribution  on  the  hull. 

When  two  ships  are  alongside  underway,  this  venturi 
effect  is  increased  and  becomes  more  complicated  due  to 
the  mixing  of  the  pressure  areas  of  two  ships. 

Figure  2  shows  ships  which  are  in  dangerous  position 
because  they  are  being  acted  on  by  radically  different 
pressures.   Reduction  of  speed  increases  the  danger  of 
collision.   Also  the  pressure  effects  are  more  exaggera- 
ted and  extra  care  is  required  in  maneuvering  (in  depths 
less  than  20  fathoms) . 

It  is  understood  that  to  maintain  station  during 
UNREP  operation  a  certain  amount  of  rudder  is  required 


10 


which  depends  on  size,  load,  sea  conditions,  speed  and 
ship  separation.   But  this  change  of  rudder  deflection 


I 


\ 


V 


'Sue.  r/o/s 


/ 


i 


\  A 


^1 

Figure  2.   Ships  alongside  underway. 

decreases  handling  capabilities  of  the  receiving  ship. 

The  problem  of  interaction  effects  has  been  studied 
theoretically  by  Silverstein  [3]  and  experimentally  by 
Newton  [4]  with  both  approaches  showing  agreement  in  the 
general  conclusions. 

When  two  ships  are  underway  with  a  certain  separation 
and  on  parallel  courses,  the  pressure  fields  mix  which 
results  in  an  unbalanced  force  and  moment  on  each  ship. 
This  interaction  moment  must  be  cancelled  by  the  rudder 
action  in  order  to  maintain  station.   However,  there  is 
a  position  where  the  rudder  force  tends  to  add  to  the 
force  of  attraction,  see  Figure  3.   Thus  in  these  posi- 
tions a  bigger  rudder  deflection  is  required  so  the  yaw 
angle  produced  in  this  way  creates  an  outboard  force 
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Figure  3.  Relative  position  where  both  interaction 
forces  and  moments  tend  to  draw  one  ship 
toward  the  other. 


which  balances  both  the  rudder  and  interaction 
force. 

Newton's  experiment,  both  with  models  and  full  scale 
trials  in  open  sea,  prove  one  important  thing:   It  is  the 
process  of  approach  or  departure  from  the  abeam  or  "fuel- 
ing" position  that  includes  the  maneuvering  risks.   It 
should  be  noted  here  that  an  increase  in  velocity  or  de- 
crease of  separation  between  ships  results  in  the  increase 
of  the  interaction  effects. 
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III.   DERIVATION  OF  THE  LINEAR  MATHEMATICAL  MODEL 

A.   GENERAL  CASE-SIX  DEGREES  OF  FREEDOM 

It  is  well  understood  that  the  coordinate— axes  system 
fixed  on  the  ship's  body  is  an  Eulerian  system.   It  is  as- 
sumed that  at  t=0  the  Eulerian  system  and  the  space  co- 
ordinates system  coincide,  as  shown  in  Figure  4.   The  geo— 
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Figure  4.   Orientation  of  fixed  axes  and  moving  axes. 

graphic  coordinate  system  then  describes  the  motion  of  the 
ship  through  the  fluid  medium  in  six  degrees  of  freedom. 
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The  Newton's  laws  of  motion  in  vector  form  are 

d 


F  (External  Force)  =  -=r-  (momentum) 

dt 


M  (External  Moment )=  tt  (angular  momentum)        (III— 1) 

Then  the  six  equations  (six  degrees  of  freedom)  describing 
the  ship's  motion  have  been  found  [5] 

2   2 

X=m[u+qw-rv-xG(r  +q  ) +y  (pq-f ) +zQ (pr+q) ] 

2   2 

Y=m[v+ru-pw-yG(r  +p  ) +zQ (qr-p) +xQ (qp+v) ] 

2   2 
Z=m[w+pv-qu-zG(p  +q  ) +x     (rp-q) +yQ (rp+p) ] 

K=plx+ (Iz-IY)qr+m[yG(w-qu+pv)-zG(v-pw+rv) ] 

M=qly+  (Ix-Iz)pr+m[zG(u-rv+qw)-^cG(w-qu+pv)  ] 

N=±I  + (I  -I  )pq+m[xG(v-pw+ru)-yG(u-rv+qw) ]  (III-2) 


Using  (III— 2)  the  following  equations  can  be  satisfied: 

/\  ^         ^ 

F  =  iX  +  jY  +  kZ 

(III-3) 
M  =  iK  +  jM  +  kN 

and  where:  m  —  mass  of  the  ship 

X,    Y,  Z  —  components  of  force  in  the  x,y,z  directions 

K,  M,  N  —  components  of  applied  moment  about  x,y,z 
axes 

u,  v,  w  —  components  of  velocity  in  the  x,y,z 
directions 

x,  Y  ,  z_  —  distances  of  origin  from  center  of  gravity 
in  x,y,z  directions 


\  ■■■ 
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p,  q,  r  —  components  of  angular  velocity  about  the 
x,y,z  axes 

1.1,1   —  moments  of  inertia  about  the  x,y,z  axes 
x   y   z  ' J  ' 

Equation  (III— 2)  describes  the  reaction  of  the  rigid 
body  of  the  ship  itself  as  a  function  of  its  geometric 
and  physical  characteristics.   Note  that  they  do  not  in- 
clude any  external  moments  such  as  due  to  fins. 

B.   HORIZONTAL  PLANE  MOTION 

It  is  well  understood  that  the  ship's  motion  in  calm 
waters  is  described  only  by  the  following  four  equations: 

2   2 

X  =  m [u+qu-rv-xG (r  +q  ) +yQ (pq-f ) +z  (pr+q) ] ,  surge 

2   2 
Y  =  m[v+ru-pw-yG(r  +p  ) +zQ (qr-p) +xQ (qp+r) ] ,  sway 

N  =  rl  +(I  —I  ) pq+m [x  (v— pw+ru)— y_ (u— rv+qw) ] ,  yaw 

K  =  pi  +(I  -I  )qr+m(y_(w-qu+pv)-z^(v-pw+rv) ] ,  roll  (III-4) 
x    z   y        (j  \j 

because  under  the  calm  water  assumption  it  is  true  that 

Roll  =  Pitch  =  Heave  =  0.   That  is  the  horizontal  motion 

implies:   p=p=q=q=w=w=  0.   Hence  the  equations 

(III— 4)  can  be  written: 

2 

X  =  m [u-rv-x_r  — y„f] 

2 

Y  =  m[v+ur+x_r— y  r  ] 

K  =  m[-zQ(v+rv)  ] 

N  =  fl  +m[xr(^+ru)-y_(u-rv)]  (III-5) 

Equations  (III— 5)  can  be  further  simplified  assuminq 
that  the  center  of  gravity  (CG)  is  placed  at  the  origin 
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of  the  x,  y,  z  coordinate  system  then  x   =  y   =  z_  =  0. 

G     G     G 

Hence,  neglecting  the  roll  eguation  we  have: 
X  =  m[u— rv],  surge 
Y  =  m[v+ur],  sway 
N  =  f I      ,  yaw  (III-6) 

There  are  the  reduced  equations  for  steering  and  maneu- 
vering of  a  ship.   It  is  noted  that  the  left  hand  side  of 
equations  (III— 6)  represents  the  forces  and  moment  along 
the  coordinate  axes,  and  the  right  hand  side  shows  the  cor- 
responding dynamic  response  terms  on  the  horizontal  plane 
of  motion. 

C.   LINEARIZATION  THROUGH  TAYLOR'S  SERIES  EXPANSION  [5] ,[6] 

The  forces  and  moments  on  the  left  hand  side  of  equa- 
tions (III— 1)  through  (III— 6)  can  be  expressed  as  functions 
of  properties  of  the  body,  properties  of  the  fluid  and 
motion. 

Since  steering  and  maneuvering  are  of  interest,  forces 
and  moments  are  also  considered  as  functions  of  rudder 

(control  surface)  deflections  and  the  change  in  r.p.m. 

(An)  of  the  propeller  shaft.   Thus: 

Forces  "i    =    f  (properties  of  motion,  rudder  deflection,  etc .)  = 

Moments j  =  f  (x  ,y  ,  z  ,  <j> ,  9  ,ip  ,u,  v,  w,p,q,r  ,u,  v,w,p,q,f  , 

< : — —. >  < : > 

orientation       motion  parameters 
parameters 

5 , 6 , 5 , An,  etc. ) 

< > 

control  surface  parameters  (III— 7) 
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For  a  surface  ship  moving  on  the  horizontal  plane  no 
forces  or  moments  are  due  to  orientation  changes.   Thus 
the  forces  and  moments  will  be  functions  of  three  degrees 
of  freedom  of  motion  parameters,  rudder  deflection  para- 
meters and  changes  in  r.p.m.   Hence: 


=  f  (u,v,r ,u, v,r , 6 , 6 , 6 , An,  etc.) 


(III-8) 


In  general  we  linearize  a  function  f (x)  by  the  use  of 
Taylor's  series  expansion. 


f(x)  =f(Xi)+Axa|ixL  + 


where 


Ax  =  x  —  x. 


.  Axn  dnf(x) 


nl 


dx 


n 


For  small  values  of  Ax  the  second  order  terms  can  be 
neglected  and  thus  considering  only  the  following  expres- 
sion for  f (x) : 


f(x)=  f  (xx)  +  Ax  ^|i^- 


(III-9) 
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This  is  the  linearized  Taylor's  series  expansion.   The 
same  principle  can  be  applied  for  small  perturbations  in 
the  equation  (III— 8),  which  is  a  function  of  many 
variables . 

Since  the  Taylor  expansion  is  written  for  a  particu- 
lar point  we  choose  this  point  to  be  an  equilibrium  posi- 
tion.  An  equilibrium  position  is  that  of  straight  ahead 
motion,  at  constant  speed  with  rudder  amidships.   The 
hydrodynamic  forces  and  moment  have  been  found  [6]  to  be : 

X=XAu+Xv+Xr+    X-u   +    X-v   +    X-r    +    Xr6    +    X   An 
u  vruvron 

where  Au   =    u  —  u,  and  An   =   n  —  n,  and 

the    subscript    1    is    referred    to    the   values    of    the   variables 
at   the    initial    equilibrium  condition   and   where   all    the 
partial   derivatives    are    evaluated.       For   Y   and   N    similar 
expressions    hold.       Equating    the    linearized   expression    for 
X,    Y,    and   N   with   equation    (III— 6)    results    in   the    linear- 
ized   equations   of   motion    for    steering   and   maneuvering: 


X   Au+X   v+X   r+X-u+X-v+X-r+Xx6+X   An   =   mu 
u  vruvron 

Y   Au+Y   v+Y    r+Y-u+Y-v+Y-r+Yr6+Y    An   =   m(v+ru,) 
uvruvron  1 

N    Au+N   v+N    r+N-u+N-v+N-r+N. 5+N    An    =    I    r  (111-10) 

u  v        r        u        v        r         6        n  z 

Note  that  the  term  mvr  in  the  right  hand  side  of  the  first 
of  equations  (III— 6)  has  been  dropped  since  the  ship  was 
assumed  in  straight  ahead  motion.   The  derivatives 

V  V  V  Xr'  X6 
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and     N  ,  N-   vanish  for  any  symmetrical  port  and  star- 
board shape  of  ship  (symmetry  about  the  xz— plane) .   This 
has  the  effect  of  decoupling  surge  from  sway  and  yaw. 
Thus  equations  (III— 10)  become: 

(X--m)u+X  Au+X  An  =  0 
u       u     n 

(Y--m)v+Y  v+(Y  -mun )r+Y.f+Yr6+Y  An  =  0 
v      v     r    1     r    6    n 

(N--I  )r+N  v+N.v+N  r+N^S+N  An  =  0  (III-ll) 

r   z     v    v    r    6    n 

Using  as  a  basis  the  linear  mathematical  model  of 
equations  (III— 11)  the  criterion  for  dynamic  stability  in 
straight  line  motion  [5]  is  evaluated  as 

C  =  Y  N   -  N  (Y  -raun  )  >  0 
v  r     v   r    1 

It  is  obvious  that  the  treatment  of  the  linear  mathema- 
tical model,  for  the  study  of  a  dynamically  stable  ship, 
can  be  applied  to  predict  maneuvering  -and  control  only  for 
small  deviations  from  the  original  straight  line  motion 
due  to  small  rudder  deflections  and  small  changes  in  r.p.m. 

D.   NON-DIMENSIONAL  EQUATIONS 

Table  I  gives  the  dimensionalized ,  nondimensionalized 
quantities  and  their  respective  conversion  factors.   The 
prime  notation  corresponds  to  the  nondimensionalized  quan- 
tities.  In  equations  (III— 10) the  force  equations  are 

2  2  3  2 

divided  by  (p/2)L  u,  and  the  moment  equation  by  (p/2)L  u  . 
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The  resulting  nondimensional  equations  are: 


(X!  -m' )u'+X,A'+X,A,n=  0 
u         u  u   n 

(Y!  -m' )v,+Y'v'+(Y'  -m'u' )r '+Y!r '+Y'6'+Y' A'n  =  0 
v         v     r      1      r     6     n 

(N!  -I1 )r ,+N,vl+N!v,+N'r,+N' 6 ' +N *  6 ' n=  0  (IV-1) 

r    z      v     v     r     6     n 

It  is  noted  here  that 

ul 

~  1.0 


for  small  perturbations. 


-»■ 

U 
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TABLE  I 
NONDIMENSIONAL  NOMENCLATURE 


Symbol     Non— Dimensional 

Form 


Definition 


u 


u    1  .  T  2 


2  pL  Ul 


Derivative  of  longitudi- 
nal force  component  with 
respect  to  longitudinal 
acceleration  component  u 


u 


u 


X 

xu  =  i~T 

2  p    1 


Derivative  of  longitudi- 
nal force  component  with 
respect  to  longitudinal 
velocity  component  u 


v    1   T2 
2  pL  ul 


Derivative  of  lateral 
force  component  with 
respect  to  transverse 
velocity  component 


Y'  =  ¥_ 

o"  PL 


Derivative  of  lateral 
force  component  with  res- 
pect to  transverse 
acceleration  component 


Y'  = 

2  pL  ul 


Derivative  of  lateral 
force  component  with  res- 
pect to  yaw  angular 
velocity  component 


Y. 
r 


r    1 


Y. 

r 


2  P  L 


Derivative  of  lateral 
force  component  with  res- 
pect to  yaw  angular 
acceleration  component 


6    1   T2  2 
2  pL  Ul 


Derivative  of  lateral 
force  component  with  res- 
pect to  rudder  angle 
component 
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N' 
V 

N 

V 

1 
2 

T3 
pL   u1 

N! 

V 

N« 

1 
2 

PL4 

Derivative  of  yawing  mo— 
v  v    1   ,3  ment  component  with  res— 

tc  pii  Un  ,   , , 

2      1  pect  to  transverse 

velocity  component 


N.  N!  =  •= j Derivative  of  yawing  mo- 

ment component  with  res- 
pect to  transverse 
velocity  component 

N 

IT 

N  N'  =  j 2 Derivative  of  yawing  com- 

~-  pL  u,  ponent  with  respect  to 

yaw  angular  velocity 
component 

N. 

N.  Ni    -^ f—  Derivative  of  yav/ing  mo— 

y  p  L  ment  with  respect  to  yaw 

angular  acceleration 
component 

N6 
Nr-         N'    •* ~ — j  Derivative  of  yaw  moment 

■=    pL  u,  component  with  respect 


X 
I 

PL" 


U 


to  rudder  angle  component 


X  X   =  -; ^ Derivative  of  longitudi— 

n  n    1   T  3  ,  ,.  3.   .  .  . 

■^  pL  un  nal  force  component  with 

respect  to  change  in 

propeller  rpm 


•  Y 

Y  Y'  =  -= £ Derivative  of  lateral 

-~    pL  u,  force  change  in  with  res- 

pect to  propeller  rpm 

N 

N  N1  =  -= ? Derivative  of  yawing  com- 

n  n       4  . 

y  pL  u,  ponent  with  respect  to 

change  in  propeller  rpm 

r  L 
r  r1  =  ==—  Yawing  angular  velocity 


componenr 


rL 
f '  =  — y—  Yawing  angular  accelera- 

U  tion  component 
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u 


U'  =  1 


Velocity  of  origin  of 
body  axes  relative  to 
fluid 


i    v 

v '  = 


U 


Transverse  velocity  compon- 
ent of  origin  of  ship  axes 
relative  to  fluid 


vL 

u2 


Transverse  acceleration 
component  of  ship  axes 
relative  to  fluid 


X 


X'  = 


X 


1  T2  2 

2  pL  Ul 


Hydrodynamic  longitudinal 
force  (positive  direction 
forward) 


Y«  = 


1  T2  2 

2  PL  u± 


Hydrodynamic  lateral  force 
(positive  direction  to 
starboard) 


m 


m 


|PL3 


Mass  of  the  ship 


u 


i    u 

u   =  — 

U 


Velocity  of  origin  of 
ship's  axes  along  the 
x— axis 


u 


u 


uL 

u2 


Acceleration  of  origin  of 
ship's  axes  along  the 
x— axis 


m 


z    1    T5 

2  P  L 


Moment  of  inertia  of  the 
ship  with  respect  to  the 
z— axis 
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IV.   AXES  FIXED  RELATIVE  TO  THE 
EARTH-LANGRANGIAN  SYSTEM 

To  convert  equations  (III— 6)  from  the  Eulerian  system 
to  the  Langrangian  system,  see  Figure  4,  the  stationary 
coordinate  system,  the  total  forces  in  the  x  and  y  direc- 
tion in  the  ship  coordinates  must  be  expressed  in  terms 
of  the  stationary  coordinates  as  follows: 


X  =  X   cos  \b    +  Y   sin  \b 

o  Y  o      Y 

Y  =  Y   cos  \b    +  X   sin  \b  (V-l) 

o  o 


Also  the  center  of  gravity  possesses  velocity  and  ac- 
celeration with  respect  to  the  stationary  coordinate  sys- 
tem expressed  as  follows: 

x      '  =    u    cos    \b   —  v   sin    \L> 
°G 

y        =   u   sin   \ii   +   v   cos    ii  (V— 2) 

°G        • 

and 

••  • 

x        =   u   cos    \p  —  v    sin   y  — (u    sin   ty   +   v   cos    ^))\p 

G 

••  • 

y        =   u    sin   \p   +   v   cos    \\>   +(u   cos    \p  —  v    sin   ij;)^ 
°G 


(V-3) 

Equations  (V— 2)  can  be  used  to  calculate  the  trajec- 
tory and  velocity  of  the  ship  with  respect  to  stationary 
coordinate  system.   Equations  (V— 3)  can  be  used  to  calcu- 
late the  acceleration  along  this  trajectory. 
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V.   ANALOG  COMPUTER  PROGRAMMING  FOR 
EACH  SHIP  INDEPENDENTLY 

A.   PRELIMINARY  STUDY 

In  this  section  we  will  discuss  the  simulation  of  the 
ship  dynamics  in  open  calm  sea.   The  equations  of  motion 
for  each  ship  are  programmed  independently  and  no  interac- 
tion forces  and  moments  are  considered. 

1.   Linearized  Equations  of  Motion 

Equations  (IV— 1)  are  repeated  here  for  convenience 

as  follows: 

(ni'-X!)u'  =  X'u1  +  X'Sn,  Surge 
u       u      n 

(m'-y!)v'  =  Y'v'  +(Y!-m'u,)iWY-f#,+Y,S,+Y*  <5R'  ,  Sway 
v       v      \\>  o  Y    ipr    n  n   6R 

(I'-N.',  )\i)t    =    N'v'  +  Nl^'Nlv'+N'  SR'+N1  6n  '  ,  Yaw   (V-l) 
z  \p    Y  v       tyy      v     6R      n 

where 

r  =  * 
f  =  $ 

"     N6  "  N«R 
An  =  6n 

u   =  u, 
o     1 

It  is  noted  here  again  that  all  the  variables  corres- 
pond to  small  perturbation  variables.   It  is  first  chosen 
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the  equilibrium  condition  as  follows: 

Nominal  values:   x   =  15  knots  =  25.32  ft/sec  =  u 

v   =  0 
o 

\b      =   0 

ro 

2.   Magnitude  Scaling  of  the  Linearized  Equations 
Following  the  usual  procedure  each  equation  of 
equations  (V— 1)  is  scaled  by  letting  each  variable  be  re- 
presented by  its  maximum  value  times  the  scaled  variable. 
That  is: 

u  =  u  u 
m 

and  in  non-dimensional  form: 

m 

where:   u   is  the  maximum  expected  value 
m  r 

u   is  the  scaled  variable  whose  value  ranges  from 
—1  to  +1  computer  units  (i.e.+  100  volts  for 
CI— 5000  analog  computer) . 

Makint  this  substitution  for  all  the  variables  in 
equations  (V— 1)  and  solving  for  the  scaled  variables  u,  v, 

and  ^  we  obtain: 

X'  u'  X'  5n' 

—    r    u  m    ,  — .    r    n   m  -,  «.--■ 

u    l(m'— X!)u'        l(m'— X!)u' 
urn  u   m 

Y'  v1  (Yj-ra'u  )#'  _     Y*  $'     - 

t    ,    v  m    ,  — ,    p   u)     o   m,  ,  ,  ,  r    mm      ,  ,  , 

v  m  v   m  v  m 

Y'  5R'  Y'  5n' 

r   ok   m    ittti  ,  r   n    m     -, -?r  , 

+  I-? — i — »  i  x  •  ■ — JoR'+  [-7 — i — „  ,  ;  .  , Jon 

(m1— Y!)v'  l(m'—  Yi)v' 
v  m  v  m 
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n'  v1         n;  i>' 

v     g  ]  v'  +  [ »  m..   ]  f 


(I'-N-'-  i|>'  (I'-N!)^' 

v  z  \p    Ym  z   ip  rm 

Nl  v'            N'  6R' 
+  [ Y_JL_]  j.  +  [ 6R  m  -]  6R' 

(I'-N')  '  (I'-N*)  if  ' 

z     m  z   ^  rm 

N'6n" 

+  [ — ^ — ]  fini  /  (V~2) 

z  \p      m 
Letting  each  term  in  brackets  be  a  coefficient  (k) , 
equations  (V— 2)  can  be  written  as: 
u'  =  ~k11u'  +  k126"n' 

v'  =  -*15v'  -  k16^'  -k171f  +  k186R'  -k196n' 

*   =  ~klll^'~k112^,~k113^,~k114^R,+k115^n'      (V~3) 
where  the  appropriate  sign  has  been  extracted  so  that  each 
coefficient  is  now  positive.   Table  IV  gives  the  nondimen— 
sional  values  necessary  for  equation  (V— 2)  and  (V— 3).   The 
following  data  are  also  given  in  Table  II. 

TABLE  II 


u   =  25.32  ft/sec  (nominal  ship's  velocity) 

u2  =  640.0  (ft/sec)2;  p  =  2  lbs  sec2/ft4;  L  =  527.87  ft 

ipL3u2  =  9.428E+10;   ^pL2u2  =  17.86E+07 
z  o  z  o 

i-pL5=  4.095E+13;  4pL3  =  l .  4707E+07  ;  ipL2  =  2  .  7862E+05 


27 


3.   Calculation  of  Potentiometer  Coefficients 

In  obtaining  a  set  of  scaled  equations,  it  is  best 
to  work  with  dimensional  quantities.   Actually,  scaling  the 
nondimensional  equations  is  equivalent  to  scaling  the  di- 
mensional set.   Tables  III  through  V  give  all  the  necessary 
data  for  the  scaling  procedure.   Referring  to  dimensional 
quantities  equations  (V— 2)  can  be  rewritten  as: 

X   u  X  6n 

t    r    u  m  -,—  r      n     m  ,-r-       0 

u  =  [-7 „  v  . — ]u  +  [-7 .  . — Jon,  Surge 

(m— X.)u  (m— X.)u          3 

urn  u  m 

Y  v         (Y,-mu  )\b 

t    r   v  m  ,7-  ,  r  y        o  mlT 

u  =  [(m-Y.)v~]v  +  [(m-Y.)v ]  * 

v  m  v  m 

Y"    J    -     Yr_  6R 

r   \b   Tm  ,  V    r  6 R   to  ,7: 

+  [(m-Y,)v  ^  +  [(m-Y.)v  ] 5R 
v  m  v  m 

Y  6n 

+  [(m-Y.)^  ]5n'  Sway 
v   m 

-  N      v  N.    tp  N.    v 

.  r        v     m      ,  —  ,     r  u>    rm   ,  t  r        v      m      ,  — 

*   =    t(I   -N..)ip    3v  +     [Tl   _^    )(p    H    +  [(I   _N    ^    ]v 
z      xp    rm                 v    2      ijr  rm  z      ip    rm 

+     [(IN-N-;^    'rR+     t(IN-N^    '*""'    YaW  <V~4) 

z      \p'  ym  v    z      ijr  rm 

Let      Dn .    =    (m— X.)u      =   mu      —   X.u 
Hum  m  urn 

f>  2 

=    (1.166    x    10      slugs    x    0.844    ft/sec 

+    1.0295    x    105    lbs/ft/sec2    x    0.844    ft/sec2) 

=    0.984    x    106    +    0.0866    x    106    =    1.07    x    106    lbs 

D. _    =    (m— Y.)v      =   mv      —  Y.v 
12  v     m  m  v  m 

-  1.66  x  106  x  0.844  +  1.043  x  106  x  0.844 

=  0.984  x  106  +  0.880  x  106  =  1.864  x  106  lbs 
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D, -   =    (I   -N-;)^      =    I    \p      — N-*ip 
13  z      ip    rm  zrm        iprra 

=  1.43  x  1010  lbs  ft/rad/sec2  x  0.87  x  io~3rad/  2 

sec 

=  1.244  x  107  +  1.533  x  107  =  2.777  x  107  lbs-ft 

Then  from  equations  (V— 3)  and  (V— 4) 

X   u  3    ■ 

_,      r  u   m,    r— 8.465  x  10  lbs/ft/sec  x  5.064  ft/sec, 

K     -   [— — J   _   [ j 

x  11  1.07  x  10   lbs 

3 
=  ~42,866  X  1°      =  -40.0623  x  10~3  =  -0.040623 
1.07  x  10 

x  (S  S  rec/sec 

_r  n   m,     r1.72  x  10  lbs/rev/sec  x  30rpm  x  60rpm  , 

x       11  1.07x  10   lbs 

-  1'12   X  1()5  X  ,°-5   =    0.08037 
1.07  x  10 


Y  v      „  _    nrt4. 

''12  1.864  x  10"  lbs 


Y  V  4 

_  r  v  m1_r— 8.76  x  10  lbs/ft/sec  x  5.064  ft/sec, 

15  "  lD^rJ~L      TT7,        ,rt6  ~  J 


4 
—44  36  x  10  — ? 

_   ^-)o  x  iu   =  _23>798  x  10    =  -0.23798 

1.864  x  10 

( Y ,  -rou  )  \b  Y ,  iL— mu   $ 

K16  ~  L — D J  "  L — D ] 

12.  u12 

7  -7  f     lbS    ? 

rl. 04  2x10  lbs/rad/secx3. 4 9x10   rad/sec-1. 16  6x10  ftTsec  x 

1.864  x  106  lbs 

—2 
x25.32ft/sec  x  3.49x10   rad/sec, 

[3.63  6  5xl05-2  9.5xl06x3.4  9xl0~21_  3 . 63  6  5xlQ5-10 . 3 03x10 5 
1.864  x  106  1.864  x  106 

=   ~6-66xlQ   =  -3.5762  x  10"1  =  -0.35762 
1.864x10 
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Y..V  7   lbs  -   lbs  ? 

rV_Hi    r~2.  0  96x10  rad/sec  xO.  8  7x10  rad/sec  -, 

K17  ~  l~D   J  ~  [  6  J 

l/  u12  1.864  x  10   lbs 

4 
=   1.82  x  10   =  _0>9764xlo~2  =  -0.009764 
1.864x  10 

rYSRSRm-,    r4.823xl05lbs/rad  x  0.35  rad1 
Kio  "  L~7i     *    ~  *■  6  * 

18      D12  1.864  x  10b 

5 

=  0.090558 


1.864  x  106 


Y  Sn        ,  0^  ,  „4- 


lbs  rev/sec 


_n_m1  _  f~  1.936x10  rev/sec  x  30rpm  60  rpm  n 

K,  q  —   I  =:  J   —   I  ■?  J 

xy      u12  1.864  x  10   lbs 

-1.936xl04x0.5  .  -0.968xlQ4  _  _Q  005193 
1.864  x  106      1.864xl06 

v      rNv  Vm1    r-1.307xl07ft/ft/sec  x  5.064  ft/sec, 

111-  [~D        J  "  L  7  J 

J-LX    u13  2.777  x  10   lbs-ft 

_   -6.6186x10   =  _2.3834  or  -0.23834  into  a  gain  of  10 
2.777x10 

N  1  9  lks*~f  t  _2 

r  4*  "i,  _  r— 4.462x10  rad/sec  x  3.49x10   rad/sec, 

112"  l~D   J  ~  L 7  J 

13  2.777  x  10   lbs-ft 

7 
=   -15.5723x10   _  _5>6C76  or  -0.56076  into  a  gain  of  10 
2.777x10 

.  .       7  lbs— ft  2 

v        -  r  V   m,    r-l. 552x10   ft/sec2  x  0.844  ft/sec  , 

113"  l_D J  "  L J 

13  7 

2.777  x  10   lbs-ft 

=   -1-30988X107  =  _0.47169 
2.777x10 

N   (SR  fi  lbs— ft 

v        _    x    6R  m,    r-l. 188x10    rad    x  0.35  rad, 

K114~  L~D ]  ~  [ 7 J 

13  2.777  x  10   lbs-ft 

7 
=   -4.158x10   =  _1>497  or  -Q.1497  into  a  gain  of  10 
2.777x10 
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-  fi  lbs— ft         rev/sec 

n   m1     5.110x10  rev/sec  x  30RPM  60RPM 

11D     u13  2.777  x  10   Ibs-ft 

5.11  x  106x0.5    2.555  x  106    Q    og2Q 
2.777  x  107       2.777  x  107 

The  calculated  potentiometer  values  are  summarized  in 
Table  VI. 

Making  use  of  the  k's  coefficients,  equations 
(V— 4)  can  be  written  as  follows: 

u  =  ki;]u  +  k126n  (V-4a) 

v  =  k,  ,-v  +  k,,ijj  +  k,_,ip  +  k,n6R  +  k,  06n 
15      16      17T     18       19 

*  =  kxllv+  k112^+  k113^+  k1146"R+k1156n 

Analog  programming  of  these  equations  will  give 
the  left  hand  side  quantities  but  sign  inverted,  because 
summer  amplifiers  and  integrators  invert  the  sign  of 
their  input  quantities.   Hence  for  analog  programming 
equations  (V— 4a)  are  written  as  follows  next: 

u  =  ~[k1]L  u  +  k12  6n]  (V-4b) 

v  =  ~tk15  v  +  k16  $  +  k17  i>   +  klg  5R  +  k19  on] 

*  =  ~tkm^  +  kH2^  +  k113^  +  k114^  +  k115^] 

Equations  (V— 4b)  can  be  written  as  follows  after 
taking  care  of  the  actual  sign  of  each  coefficient  as 
already  have  been  calculated  previously: 

fi  =  klx  u  -  k12  6n  (V-4c) 

v  =  k   v  +  k,6  ty  +  k17  \p  —   k,8  6R  +  k,g  6n 
f  =  kxllv  +  k112"  +  k113v"  4-  k114FR  +  k115Fn 
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Equations  (V— 4c)  are  finally  programmed  in  the 
analog  CI— 5000  computer. 


TABLE  III 


DERIVATIVE  DIMENSIONAL  VALUE 

Y,  1.042  x  107  lbs/rad/sec 

Yv  -2.096  x  107  lbs/rad/sec2 

Yv  -8.76  x  104   lbs/ft/sec 

Y^  -1.083  x  106  lbs/ft/sec2 

Nv  -1.307  x  107  lbs-ft/ft/sec 

N^  -1.552  x  107  lbs-ft/ft/sec2 

Yn  -1.936  x  104  lbs/rev/sec 

Nv  -1.762  x  1010lbs-ft/rad/sec2 


♦ 

6R 

[6R 


4.823  x  105  lbs/rad 
N.D  -1.188  x  108  lbs-ft/rad 


X  -8.465  x  103  lbs/ft/sec 


u 


X.  -1.0295x  105  lbs/ft/sec2 


u 


Xn  1.720  x  105  lbs/rev/sec 


n 


N  5.110  x  106  lbs-ft/rev/sec 


n 


N.  -4.462  x  109  lbs-ft/rad/sec 
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TABLE  IV 


DERIVATIVE 

non-di: 

(x.  - 
u 

m) 

1        T3 

2PL 

(Vv- 

m) 

1        T3 

2PL 

<*♦- 

m  uQ) 

1        T3 

T-pL   u 
2^        o 

(H,- 

V 

1       T5 

2PL 

Y» 

1        T3 

ttDL     U 

2^         o 

Y* 

1        T4 

2-PL 

Yv 

1        T2 

T-pL   u 
2^         o 

Y. 

V 

1       T3 

2PL 

N. 
V 

1      T4 

Nv 

1    T3 
oPL   u 
2^         o 

Yn 

1    r3 
2^        o 

N* 

2-PL 

Y6R 

1    T2    2 

TPL   u 
2^         o 

N5R 

^T3      2 

tPl  u 
2C        o 

Xu 

1        T2 

TPL    U 
2^         o 

X. 

u 

ipL3 

Xn 

1       T3 

^-pL    u 
2^         o 

N 
n 

1        T4 

T-pL   u 
2r         o 

N7 

1       T4 

2^         o 

m 

1      T3 

2pL 

NON-DIMEN . VALUE 


-850   x  10  5 


-1500  x  10  5 


-510   x  10  5 


-77.9  x  10  5 


.0028 
-.0027 
-.01243 
-0.0071 
-.0002 
-.0035 
-.0000052 
-.00043 

.0027 
-.00126 
-.0012 
-.0007 

.00005 

-.0000026 

-.00227 
.0079 
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TABLE  V 


PARAMETERS  AND  MAXIMUM  VALUES 


m,  =  1.26  x  10  (slugs)       —  mass  of  ship  with  entrained 

water 

m  =  m,/1.08  =  1.166 (slugs)  —  mass  of  ship  itself  only 

I   =  1.43  x  106  Inertia  (slugs  -  FT2) 
z 

til   =  0.26  Yaw  Angle  (RAD)    =  14.9  (degrees) 
m 

fi   =  0.0349  Yaw  Vel .  (RAD/SEC)  =  2  DEG/SEC 

tij   =  0.00087  Yaw  Accel.  (RAD/SEC2)=  0.05  DEG/SEC2 

x   =  5.064  =  y  (FT/SEC) 

om  J  om 

x   =  0.844  =  y  (FT/SEC2) 

om  iom 

x   =  550  (FT) 

om 

6Rm=  20  Rudder  Defelction  (DEG)    =  0.35  (RAD) 

6nm=  30  Propeller  Speed    (RPM)    =  (RAD/SEC)  =  -^-(REV/SEC) 

V   =  160  (FT) 

om 


L  =  527.85  Ship  Length    (FT) 
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TABLE  VI 


COEFFICIENT  VALUES 


k  =  0.0404623 

k  2  =  0.08037 

kn  c  =  0.23798 
lb 

k,c  =  0.35762 
16 

k  =  0.009764 

klg  =  0.090558 

k,Q  =  0.005193 
i  y 

k..,,  =  0.23834  (into  a  gain  of  10) 

k,,„  =  0.56076  (into  a  gain  of  10) 

k113  =  °-47169 

k   .  =  0.1497   (into  a  gain  of  10) 

k115  =  °-0920 


For  ship  No  2  the  following  relationships  hold 


k21   ~  kll 

k22   =  k12     etc* 
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TABLE    VII 


MARINER    CHARACTERISTICS 


Length,    ft.  528.5 

Beam,    ft.  76.0 

Draft,    ft.  29.75 

Displacement,  tons  20.900 

Block   Coefficient   C,  .6125 

b 

Prismatic  Coeff.  C  .6246 

P 

Midships  Section  Coeff.  C  .9807 

r  m 

4 .   Analog  Patching  Configuration 
a.   Static  Test 

(1)  Ship  No  1.   Figure  5  shows  the  analog 
patching  used  for  the  static  test.   The  9300  digital  ma- 
chine was  used  for  this  job.   Computer  program  IA  con- 
tains the  source  deck  of  the  program  as  well  as  the 
print  out.   Table  VIII  gives  the  values  of  parameters  as 
used. 

(2)  Ship  No  2.   Figure  6  shows  the  analog 
patching  used  for  the  static  test.   Computer  program  IB 
gives  the  source  deck  and  Table  IX  gives  the  values  of 
parameters  as  used. 

The  static  test  was  satisfactory  since 
the  printed  values  were  the  correct  expected  ones.   As 
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Figure  5 


-lo<> 


Analog  diagram  for 
static  test  of 
ship  No  I. 


L%r®- 


After  the  coordinates  transformation 
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TABLE  VIII 

Potentiometer 

Adjusted 

Parameter 

Assigned  I.e. 

Address 

Value 

of  integrators 
for  static  test 

P000 

0.1000 

An 

A001   3.   volts 

P001 

0.0300 

IC-A001 

A003   6.   volts 

P002 

0.0803 

K12 

.  A005   9.   volts 

P003 

0.0600 

IC-A003 

A013  12.   volts 

P004 

0.0404 

Kll 

A017  15.   volts 

P005 

0.0052 

K19 

A051   3.   volts 

P007 

0.0900 

IC-A0  0  5 

A057  45.4  volts 

P010 

0.2379 

K15 

P011 

0.2383 

Klll 

P012 

0.4717 

K113 

P013 

0.0250 

rm  rm 

P014 

0.1200 

IC-A013 

P015 

0.5607 

K112 

P016 

0.1340 

m   m 

P017 

0.1500 

IC-A017 

P020 

0.0920 

K115 

P021 

0.0097 

K17 

P022 

0.3576 

K16 

P053 

0.0905 

K18 

P054 

0.0500 

P055 

0.1497 

K114 

P050 

0.0337 

[ym/ym] 

m   m 

P051 

0.3000 

IC-A0  51 

P056 

0.0092 

m  mJ 

P057 

0.4540 

IC-A0  57 

P437 

0.1000 

AR 

P006 

0.1660 

[u  /u  ] 

m  m 
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hT 


infamy 


12,  i^°3€ 


10 

C 


~ @)-r 


JSWu^&.iW   j*>~|  Figure  6.   Analog  diagram 

d^-4^-(«^  I  f°r  static  test 

v_y  vly  I  of  shio  No  2. 

[_ y 


After  the  coordinates  transformation 
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Potentiometer   Adjusted 
Address         Values 


TABLE  IX 
Parameter 


Assigned  I.C.  to 
integrator  for 
static  test 


P024 
P025 
P026 
P027 
P030 
P045 
P031 
P023 
P034 
P033 
P046 
P032 
P035 
P047 
P036 
P037 
P040 
P041 
P042 
P043 
P044 
P407 
P425 
P426 
P052 
P417 
P427 
P416 


0.1000 

An 

A035 

3. 

volts 

0.0300 

IC-A0  3  5 

.  A027 

6. 

volts 

0.0803 

K22 

A033 

9. 

volts 

0.0600 

IC-A02  7 

A041 

12. 

volts 

0.0404 

K21 

A043 

15. 

volts 

0.0920 

K215 

A065 

30. 

volts 

0.0052 

K29 

A061 

54.5 

volts 

0.0905 

K28 

0.1660 

[VUm 

0.0900 

IC-A0  3  3 

0.4717 

K213 

0.2379 

K25 

0.2383 

K211 

0.1497 

K214 

0.0097 

K27 

0.0250 

rm  Tm 

0.1200 

IC-A0  41 

0.1340 

rm  rm 

0.1500 

IC-A04  3 

0.5607 

K212 

0.3576 

K26 

0.0337 

CW 

0.3000 

IC-A065 

0.5000 

0.5000 

0.0092 

[x  /x  ] 
1  nr  mJ 

0.5450 

IC-A061 

0.1000 

AR 
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far  as  the  logic  board  is  concerned  Figure  6c  shows  the 
wiring  necessary  for  the  amplifier's  operation  where  RT 
means  real  time  and  is  connected  to  a  capacitor  of  lyF. 
This  Figure  was  made  for  amplifier  A001  and  A003,  but 
this  is  true  for  all  the  amplifiers  used.  Also,  Figure 
6d  shows  the  logic  operation  for  the  amplifiers  A001  and 
A003,  which  is  again  true  for  all  the  amplifiers  used. 


Hrtotloq   £ou.rt:L 


f*^0  -Hoo  00C£i 
ttASl 


LoS.Il       po  o-V-06 


T\oo 


PSo 


T>fioi 


B.   CHARACTERISTIC  LINEAR  RESPONSE  OF  MARINER 

First  of  all,  amplifier  A011  was  used  as  a  timer  for 

the  8    channel  of  the  chart  recorder.   The  wiring  was  as 

shown  above. 

So  by  this  configuration,  a  pulse  was  recorded  every 

1  sec,  i.e.,  every  one  time  unit. 

Figures  7  and  8  show  the  analog  patching  diagrams  used 

to  obtain  the  responses  of  ship  1  and  2,  respectively. 

These  response  curves  are  shown  in  a  later  section.   At 

this  time  interaction  forces  and  moments  are  not  included. 
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Figure  6c.   Logic  patching  diagram  for  the  amplifiers  used 


RTQ- 


TS  O 


-O  fool  -  o.o^l  |A.f* 


RT-TS-0      xw  RtAU  TirAt 
OH  *^ 

RT 

CM 

Figure  6d .   Schematic  diagram  of  amplifier's  logic  opera- 
tion regarding  the  feedback  capacitor. 
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f     * 


Figure  7.   Analog  diagram  for  study  of  dynamic  behavior 
of  ship  No.  1. 
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Figure  8.   Analog  diagram  for  study  of  dynamic  behavior 
of  ship  No.  2. 
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The  dynamic  behavior  of  the  ships  separately  is  of  inter- 
est.  Also  note  that  all  the  initial  conditions  were  set 
equal  to  zero. 

1.   Dynamic  Test 


Amplifier  A001-A026 


e 
o 

^RC 
s 

e  .       —  e 

in         RC         oJ 
s 

o ' 

1 
RC„ 

1 
e  .       —   e 

in         RC-        o 

o   .  1_     1/RC 

e.   "  1+RC   "  S+l/RC 
in       s 


RC    (lMft) (lyF) 


=  1  sec     Settling  time  =  T   =4  sec 


Amplifier  A003-A027 


Q-o~^ 


o    RC   ein    RC   eo 
s  s 


_o  =   _j_      1/RC 

e .  '  RC  +ct  '  S+a/RC 
in     s        ' 


a/RC    0.04  0-1 


0.0404 


(lMfi) (lyF) 


=  24.8 
sec 


Settling  time  =  T     100  sec 
3  s 


Amplifier  A017-A043 


,.*-*■ 


■vn. 


RC 


RC    (lMft) (lyF) 


=  1  sec 


T   =  4  sec 
s 
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Amplifier  A013-A041 


R        R,       R,       R,       R, 

6       =    ~t^—    ei     +    ^B-    eo    +    'tT-    eo    +    7T~    eA     +    Tr- 
et R,       1         R,       2         R.fi    3         R-.  _    4         R, 


R 


] 


io  ^°] 


"So  :     RnC 


a  e 


Is 


o 


°0    R.C   a 

1  s 

e 
o 

where   R,   = 

lMfl 

R10  = 

O.lMfi 

C 

lyF 

For  the  force  free  case  it  is: 


e.  =  e„  =  e0  =  e,  =  0 
12     3     4 


Hence 


e   =  103  e 
o        o 


and 


e   =  rr—^-  fae      dt 
o    R,C     o 


e   = 


ae 


o    R,  C    o 


rTc  10ea  eo 


or 


e   +  =— ^(103a)e  =0,  let  x=e   then  x=e 
o   R,  C       o  o         o 


so    x   +  =-?7(103a)x  =  0 


Thus  the  characteristic  equation  becomes 

1 


S   + 


Rj^C 


(103a)   =  0 


Hence : 


R,C 


10a3    (10)  (0.5607)  (0.0250)   14 


=X°°  =7.15 


sec 
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Thus  : 


T   =  4  x  7.15  -    28.6  =  30  sec 
s 


By  another  way  the  same  results  can  be  obtained,  i.e 


-e   =  —  ■=-—      f   e   dt 
o      R-,  C      o 


e   =    =— —  f   e   dt 
o 


and       e   =  —  103e 
o         o 


substituting  this  back  gives 


6o  -  "  i^C  loe  s  &o  dt 


and 


or 


Hence 


10a3     r    •  jj. 
e   =  —  =  —  f   e   dt 

o      R  C         o 


10a3   E(s) 


(s)     RXC 


SR  C 

,  n  0    sR..C+10a3    t  A  0  +  1 
_  ,    10a3     1       _  10a3 


and 


(s)       RnC      sR,C         sR,C 
Is       1  1 

10a3 


_   1    _  lxl _   1      _  ,  _ 

T    10a3  '   (10)  (0.5607)  (0.0250)  =  0.14 


ts  =  4  x  7.15  =  30  sec 
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Amplifier  A005-A033 

Again  for  the  force  free  case  only  the  closed  loop 
is  examined. 


x  =  — /  k,  wdt 


-*  *  =   ~klw 
— o 


w  =  -[f  +  k210x] 


or  for    f=0: 


w  =  -[k210x] 


or    x  =  — k  w  =  — k, [k  lOx] 


x  +  k  k  lOx  =  0 


The  characteristic  equation  is:   S+lOk  k„  =  0 


t  =  ± =  ± =  = =25 

12    10(1.66x10   )  (2.379x10   )   3.94x10      sec 


T   =  4  x  2.5  =  10  sec 
s 


Figure  9  shows  next  the  response  when  approximately 

+  5°  of  rudder  angle  is  applied.   Note  that  +  1  computer 

unit  corresponds  to  +  20°.   So  a  pot  setting  of  P  437  for 

ship  1  and  P416  for  ship  2  equal  to  1.0  corresponds  to  20°. 

The  sign  of LR   will  be  determined  of  course  from  the  sign  of 

the  reference  voltage.   In  fact  for  every  curve  taken  by 

the  chart  the  following  relationship  holds: 

A  [divisions]  x  s  [volts/divisions] 


+  100 


x  tin  units] 
m 


x[in  units] 
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Figure  9b.   Dynamic  test  of  Mariner.   AR  =  +  5° 
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Figure    10b.       Dynamic    test   of   iMariner.       AR  =   +    5° 
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Figure  lib.   Dynamic  test  of  Mariner.   AR  =  +  10° 
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where:   x   =  maximum  expected  value  in  actual  units  used 
m 

in  magnitude  scaling  the  equation 

A   =  divisions  measured 

s   =  sensitivity  in  volts/division 

x   =  actual  value  of  parameter  x  in  actual  units 

100  volts  =  1  computer  unit 

In  Figure  10  the  time  scaling  is  changed  and  the 
linear  response  of  Mariner  is  obtained  in  terms  of  u,ip  ,1^,1*0 


ttoo 


XWV£R-Cp. 


tfft 


rzj—'-t 


■SR 


Figure  12.   Steering  Control  used  for  the  dynamic  test 
of  Mariner. 


when  AR  =  15°  is  applied.   In  Figure  11  the  response  for 
AR  =  +  10°  is  shown.   The  time  constants  estimated  pre- 
viously are  the  same  as  the  obtained  ones. 
2.   Steering  Control 

a.   Analysis  of  Steering  Control 

Up  till  now  a  simplified  model  for  the  repre- 
sentation of  the  steering  control  was  used,  which  produces 
step  type  commands  +  or  —  according  to  what  reference 
voltage  is  chosen.   The  steering  control  configuration  is 
shown  in  Figure  12. 

One  question  which  arises  immediately  after 
looking  at  Figure  12:  is  this  a  physically  realizable 
steering  control?   The  answer  is  no  for  several  reasons. 
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Primarily  the  actual  steering  has  a  certain  time  lag  in 
its  response.   Also  for  a  given  rudder  change  angle  by  the 
helmsman  the  actual  rudder  accelerates  at  the  beginning 

0  -tlOO 


©""©"" 


b  -Jo< 


►•*  £r. 


'i 

and  then  decelerates  at  the  end  of  its  final  position.   So 
to  be  closer  to  the  physical  situation  of  a  steering  con- 
trol a  definite  time  lag  for  the  rudder  action  is  needed 
as  well  as  certain  limits  on  the  rate  of  change  of  the 
rudder  angle,  but  without  changing  the  initial  gain  set. 
The  time  lag  can  be  produced  by  the  above  shown  circuitry. 
The  feed  back  gain  is:   k  =  0.175  x  0.286  =0.05 
The  time  constant  and  settling  time  are  next  calculated 

a/10       k/10 

e   =  — e  .   —  — e 

o    rc     in    RC     o 


'o    a'/lORC 


e.     s+k/lORC 

in      ' 


k  =  0.5 
t  =  l/[k/10RC]  =  2  sec 


T  =  4  x  2  =  8  sec 
s 


SR 


*n. 


Sr. 


5*.+ 


■X*v\tt«J&.  3  £*(••«■ 


~8  sec 

Nov/  regarding  the  above  shown  diagram  for  the  rudder  the 
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following  can  be  deduced.   The  desired  time  lag  is  obtained 
as  well  as  the  big  initial  slope  of  AR.   The  desired  res- 
ponse is  the  dotted  line  curve  AR   seen  in  the  previous 
sketch.   To  achieve  that  a  limiter  is  used  which  limits 
the  output  e,  as  it  can  be  seen  from  Figure  13a. 


■Sk 


Figure  13a.   Improved  steering  control. 

The  function  of  the  limiter  is  similar  to  the 
saturation  effect  as  next  shown.   Initially  the  error  sig- 
nal [6e/6e  ]  hits  the  +  7°  line  which  corresponds  to  +100 
m  —  c 

or  —100  reference  voltage,  since  the  feedback  is  zero. 
Right  after  that  due  to  the  feedback  the  error  signal  is 
reduced  almost  linearly  to  zero.   The  time  required  for 
this  is  the  desired  time  lag.   Figure  13b  illustrates  the 
various  steps  made  for  the  improvement  of  steering  control 
in  terms  of  the  output  rudder  command.   Figure  14  shows 
the  complete  analog  configuration  of  the  steering  control 
system  as  used  for  both  ship  models.   *g 
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1.       Step   command   output 
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2.   Command  with  time  lag 


SO  a 

i 


3.   Command  with  both  time  lag  and  rate  of  change 
limitation 


Figure  13b.   Improvement  steps  of  rudder  commands. 
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b.   Time  Lag  and  Settling  Time  of  Improved 
Steering  Control 

From  Figure  13a  it  can  be  seen  that: 

e    =  —   fa   e,  dt 
out         1 

e,  =  e,     +  —   e   ,  +  ~   e.       where 
1     le .     10   out    10   in 
lm 

le,    I  =  100,  -100  <  e,  <+100 
1  le.  '  —   1  — 

lm 


e   .  =  -  /a  e.     +  ttt  e   *-  +  tS  e  •  1  dt 
out         le .     10   out    10   in 
lm 

For  the  force  free  case  and  within  the  specified  limits 

it  is  : 

e   .  =  —  fa   t-tt  e   .  dt 
out        10   out 

P 
out       10   out 

or     e   .  +  a  ■=-£  e     =0 
out      10   out 

The  characteristic  equation  is: 

and     x  =1|  [ap/10] 

Now  for:  6R  =  20° 
m 

5e  =   7° 
m 

k  =  0.5 

6=1     for  real  time  simulation  and 

from  m     n  „0, 

P=Y  =  I06e-  =  °'286 
m 

k6e 
a  =  -J-5EL  =  0.1750 

OK 

m 
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it  is  obtained:        t  =  2  sec 

and   T   =  8  sec  as  before, 
s 

Figure  15a  and  15b  shov;  the  responses  for  input  commands 
AR  =  +  5°  and  An  =  +  9  RPM  but  with  different  time  scaling 
respectively.   Figure  16a  and  16b  show  the  responses  for 
input  commands  AR  =  +  10°  and  An  =  +  9  RPM  but  again  with 
different  time  scaling  of  the  chart  recorder.   It  is  ob- 
served that  the  expected  time  constants  and  settling  times 
can  be  measured. 

C.   TRANSFORMATION  OF  COORDINATES 
1 .   Introductory  Discussion 

The  responses  observed  in  the  previous  sections 
were  taken  with  respect  to  the  Eulerian  system,  i.e.  moving 
coordinate  axes  on  the  ship.   This  makes  difficult  the 
measurement  of  the  separation  distance  between  the  two 
ships  during  the  UNREP  operation.   It  is  desired  therefore 
to  use  the  space  coordinate  system,  which  for  ease  of  com- 
puter print  out  is  made  to  move  ahead  at  15  knots.   It  is 
also  noted  that  the  ship  initially  moves  straight  ahead  at 
15  knots.   Figure  17  illustrates  the  above  discussion. 

From  the  inspection  of  Figure  17,  equations  (V— 2) 
can  be  recalled,  i.e. 

x   =  u  cos  ty   —  u  sin  \p 
y   =  u  sin  ip  +  u  cos  \p 
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Figure  15a-2.   Dynamic  test  of  Mariner.   AR  =  +  5°, 
An  =  9  RPM. 
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Figure  15b-2.   Dynamic  test  of  Mariner.   AR  =  +  5°, 
An  =  +  9  RPM. 
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Figure  16a-2.   Dynamic  test  of  Mariner.   AR  =  +  10° , 

An  =  +  9  RPM. 
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Figure  16b-2.   Dynamic  test  of  Mariner.   AR  =  +  iu°, 

An  =  +  9  RPM.  ~ 
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At  this  point  computer  unit  XDS— 9300  is  used  in  hy- 
brid operation,  needed  for  the  coordinates  transformation, 
with  the  analog  unit  CI— 5000.   Computer  program  IVA  and  IVB 
show  the  source  decks  used  and  Figure  18a  shows  the  control 
statements  used  for  both  digital  and  analog  computers. 
Figure  18b  shows  the  communications  trunk  lines  used  between 
digital  and  analog  computers.   Figures  19a  and  19b  show  the 
analog  patching  diagrams  used  for  the  coordinates  transfor- 
mation for  both  ships  respectively.   Table  X  contains  the 
potentiometer  values  used.   It  should  be  mentioned  here  that 
for  the  control  of  the  hybrid  operation  for  ship  No  1  the 
logic  switches  "0"  and  "1"  were  used.   For  ship  No  2  the 
logic  switches  "2"  and  "3"  were  used.   The  hybrid  operation 


IL 


—>**., 


U. 


I 


'0 

Figure  17.   Space  coordinates  system 

was  performed  with  both  the  switches  being  in  the  middle 
position. 
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Figure    18a.       Flow   chart    for    control    of    analog    and   digital 
unit. 
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Figure  18b.   Communication  trunk  lines  between  digital  and 
analog  computer  used  for  the  coordinates 
transformation . 
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(After  coordinates  transformation  section) 

Figure  19a.   Analog  diagram  used  for  hybrid  simulation 
for  ship  No.  1. 
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Figure  19b.   Analog  diagram  used  for  hybrid  simulation 
for  ship  No  2. 
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2 .   Computed  Linear  Response  of  Mariner  after 
Coordinates  Transformation 

Figure  20  shows  the  linear  response  of  the  Mariner 
to  approximately  +  10°  changes  referred  to  midships  in  the 
rudder  angle. 

Initially  the  Mariner  is  moving  straight  ahead  at 
15  knots  with  the  rudder  at  midships  (6=0),  and  then 
AR  =  +  10°  is  applied  for  25  seconds.   Three  phases  are 
observed  for  a  turn. 

a.  Initial  Approach  Phase  in  which 
v=0,   r=ijj=0,   v=0,   r=i}/=0,  ty=0 

b.  First  Phase  in  which 
r>0,  ±='4><0,      v=0,   r=4=0 

This  phase  starts  at  the  instant  the  rudder 
is  turned,  and  ends  before  the  rudder  reaches  its  full 
deflection  angle.   The  rudder  force  (Y-6)  and  rudder  mo- 
ment (N J)  are  dominant  and  produce  accelerations  which 
are  opposed  only  by  the  inertia  of  the  Mariner. 

It  should  be  noted  here  that  the  rudder  force 
Yp<5  is  towards  starboard,  since  the  rudder  is  at  the 
stern  of  the  Mariner,  which  corresponds  to  a  port  (nega- 
tive) turn  although  the  transverse  velocity  v  is  positive 
(towards  starboard) . 

c.  Second  Phase  in  which 
v>0,   v>0,   r=$<0f   r=ijK0 

It  must  be  mentioned  here  that  a  force  Y  v 
is  created  towards  the  center  of  the  turn  (towards  port) 


76 


/ 



~ 

" 

o 

i 

■ 

1 

> 

M 

1 

~f.. 

~* 

O 

mi 

•*-  -, 
I 

- 

1 

1 

1 

T>»l  ■» 

1 
o 

1 

-21 

*> 

m 

4- 

s: 

1 

- 

= 

— 

- 

Hi 

r— 

. 

■      : 

_     . 

— 

- 

« 
o 

EEr 
• 

> 

I 

; 

.  —.:  .■ 

+ 

1       1       1       1       1       1       1       1       1       1       1       1       1       1       1       1 

i    i    i    i    i    i    i    i    i    i 

EErr 



1 



J- 







I 

c 

i_ 

- 



m 

o 
i 

o 

== 

= 

__^, 

.__ 

=rr 

— 

•> 

15 

c 

3 
1 
? 

s+ 

00 
O- 

+ 

■         1         1         1         1         1         1         I         1         1         1         1         1         1         1         1         1 

1          1  '       1          1          1          1          1          1          1          I 



~~- ' 

■ 

= 



< 

"^ 

5> 

• 

o 

+ 

= 

: 

» 

o 
*<- 

r 

j 

: 

- 

o 
O 

+  1 


< 
-P 

■d 

u 

Q) 
C 

•H 

rd 

o 

CD 

c 
o 

Cu 
w 

CD 

id 

e 

•H 


o 

•H 
-P 
W 
•H 

CD 
-P 
U 

«d 

5-1 
rfl 

sx 

U 


I 
o 

CM 

CD 
H 

•H 
fa 


77 


' 

\ 

t 

. 

/ 

(i 

/ 

/ 

' 

}l  / 

\ 

/ 

I 

\ 

' 

f 

i 

1 

j 

\ 

Jliili 

f 

TJJl' 

lift 

( 

H! 

/ 

\ 

/ 

\ 

Til 

/ 

.. 

\ 

, 

■    ' 

1 

\ 

\ 

V 

» 

\ 

< 

>  # 

'^ 

\i 

r 
4W-- 

\ 

_  .-.  _ 

/ 

& 

ci  /■ 

,aV 

1 ! 

ill 

■/o 

\rT 

/w 

0 

/ 

lu 

% 

'^ 

xT 

J 

U" 

w 

/ 

\ 

f 

j 

!;?** 

;t 

y 

- 

■   f 

\ 

f 

tx 

0 

ill i  I'll  i 

£ 

o.o? 

O 

.0. 

05 

— i 

:ii 

• 

o 

J — a 

fj 

'\ 

1 



la 

-3  ■ 

— i+i 

:— !/i 

su 

! 

Figure  20—2.   Characteristic  linear  response  of  Mariner 
at  AR  =  +  10° 
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which  is  balanced  eventually  with  the  outwards  centrifu- 
gal force  of  the  Mariner.   The  acceleration  v  is  zero 
when  this  balance  is  accomplished. 

The  third  phase  of  the  turn  is  not  developed 
because  the  rudder  is  given  a  negative  —10°  angle  and 
the  Mariner  starts  to  turn  starboard.   It  should  also  be 
noted  here  that  at  the  instant  the  rudder  is  at  —10°  the 
center  of  the  gravity  of  Mariner  is  at  maximum  port  (nega- 
tive) position.   The  process  of  turning  +10°  and  —10° 
angle  to  the  rudder  was  performed  several  times. 

Figure  21  shows  the  linear  response  of  the 
Mariner  due  to  +  5°  angle  of  the  rudder.   The  difference 
with  the  response  obtained  with  +  10°  rudder  is  basically 
the  smaller  amplitudes. 

Figure  22  shows  the  linear  response  of  the 
Mariner  due  to  a  positive  change  of  R.P.M.  of  the  pro- 
peller speed  of  approximately  9  R.P.M.  with  respect  to 
the  equilibrium  R.P.M.  (corresponding  to  15  knots). 

The  reference  axes  (x  ,y  )  are  moving  at  a 

o  2  o  3 

velocity  15  knots  initially  straight  ahead  as  is  the 
Mariner  and  consequently  the  (x,y)  axes.   The  response 
is  recorded  by  curves  of  calculated  changes  in  the  para- 
meters ty  ,$  ,'i>  ,y    ,y  ,x  ,x  .   Initially  the  origin  of  the 
(x,y)  axes  in  the  Mariner  with  respect  to  the (x  ,y  )  axes 

is  250  ft  on  the  x   axes  and  48  ft  on  the  y   axes.   Note 

o  o 

here  that  the  computer  unit,  i.e.  100  volts,  equals  160  ft 

for  y   axes  and  550  ft  for  x   axes  respectively. 
o  o 
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Figure  21—2.   Characteristic  linear  response  of  Mariner  at 

AR  =  +  5° 
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Figure  22-2.   Characteristic  linear  response  of  Mariner  at 
An  =  +  9  RPM 
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The  movement  in  the  direction  x   is  due  to  the  X  An  term 
in  equation  (V— 1) .   The  origin  of  the  (x,y)  axes  in  the 

Mariner  moves  to  the  origin  of  the  (x  ,y  )  axes  in  110  sec 

J  o   o 

approximately.   The  ship  also  yaws  —1.5°  approximately. 

It  should  be  noted  here  that  only  the  force 
and  moment  due  to  the  RPM  propeller  change  are  simulated. 
The  force  and  moment  due  to  the  propeller  equilibrium 
speed  of  15  knots  is  neglected. 

Figure  23  shows  the  characteristic  linear  res- 
ponse of  Mariner  obtained  in  terms  of  the  calculated  para- 
meters An,x  ,x  ,  y  , y  ,  ij; ,  ijj ,  ip    and  caused  +  5  RPM  change  of 
propeller  speed.   Again  the  Mariner  is  assumed  moving  at 
15  knots  at  equilibrium  position.   The  initial  position  of 
the  origin  of  the  (x,y)  axes  was  the  same. 

Figure  24  shows  the  linear  response  of  the 
Mariner  to  a  rudder  change  of  approximately  +0.562°  (for 
P437=+0 . 0281)  and  a  simultaneous  +9RPM  propeller  speed 
change  in  terms  of  the  calculated  parameter  perturbations 
x  ,  x  ,  y  ,  y  ,  $,  t|»,  An,  AR.   Again  initially  the  Mariner 
is  moving  straight  ahead  at  15  knots  with  rudder  at  mid- 
ships.  Then  both  the  rudder  and  propeller  speed  change  at 
+0.562°  and  +9  RPM  respectively.   This  results  in  yawing 
moments  which  cancel  each  other  (ip=0)  .   The  only  obtained 
perturbation  is  a  change  of  location  of  the  origin  of  the 
(x,y)  axes  on  the  Mariner  but  only  along  the  x   axes. 
Thus  it  is  concluded  that  a  rudder  angle  of  about  +0.562° 
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Figure  24—2.   Characteristic  linear  response  of  Mariner  at 
AR  =  +  0.562°,  An  =  +  9  RPM 


is  enough  to  create  a  yawing  moment  necessary  to  cancel 
the  yawing  moment  created  by  a  change  of  +9  RPM  of  pro- 
peller speed.   Figure  25  shows  the  response  of  the 
Mariner  obtained  in  terms  of  the  calculated  perturbations 
of  the  parameters  An,  x,x,y,y,^,^,  AR  and 
created  by  a  simultaneous  change  in  rudder  angle  and 
propeller  speed  at  +  5°  and  +  9  RPM  respectively.   These 
curves  can  be  analyzed  analogously  with  the  preceding 
curves.   It  is  mentioned  here  that  the  same  response  was 
obtained  for  both  ship  No  1  and  ship  No  2  in  all  the  pre- 
vious cases. 
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Figure  25-2.   Characteristic  linear  response  of  Mariner  at 
AR=+5°,  An  =+9  RPM 
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VI .   INTERACTION  FORCES  AND  MOMENTS  ARE  INCLUDED 

A.   INTRODUCTORY  DISCUSSION 

During  the  UNREP  operation  the  tracking  (receiving) 
ship  is  usually  keeping  course  to  avoid  collision  and 
maintaining  station  relative  to  the  leading  (replenish- 
ing) ship.   The  leading  ship  must  keep  a  steady  course 
and  keep  oscillations  about  this  course  to  a  minimum. 
For  this  reason  the  remainder  of  this  study  is  subdivided 
into  the  following  sections,  namely: 

1.  Phase  I:   Interaction  forces  and  moments  are 

included  but  are  applied  only  to  the 
leading  ship  as  it  is  overtaken  by 
the  tracking  ship. 

2.  Phase  II:  This  phase  considers  the  complete 

hybrid  simulation  of  the  UNREP 
operation  including  all  the  inter- 
action forces  and  moments. 

It  is  noted  that  in  phase  I  the  response  of  the  lead- 
ing ship  is  of  interest.   Further  work  in  extending  phase 
I  will  be  the  response  of  the  tracking  ship  as  it  over- 
takes the  leading  ship  so  interaction  forces  and  moments 
are  applied  to  the  tracking  ship.   This  will  be  better 
understood  after  reading  of  next  section,  since  it  is 
related  with  how  the  interaction  data  curves  are  given. 
Briefly  it  can  be  mentioned  that  these  data  correspond 
to  that  case  in  which  the  interaction  force  and  moment 
act  on  ship  A  as  ship  B  overtakes  it.   So  as  a  first  case 
ship  A  is  chosen  to  be  the  leading  ship. 
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B.   INTERACTION  DATA  CURVES-INTERPOLATION  PROGRAMMING 

Figures  26  and  27  show  the  nondimensional  N  moment  and 
Y  force  respectively  versus  the  longitudinal  separation 
(a)  between  midships  and  the  lateral  separation  (3).   The 
generation  of  these  curves  by  the  analog  computer  exceeds 
its  capability.   Therefore  these  curves  are  made  piecewise 
linear  and  stored  on  a  digital  computer  namely  the  XDS— 
9300  machine.   It  should  be  mentioned  here  that  in  this 
stored  array  the  points  which  correspond  to  600  ft  longi- 
tudinal distance  (a)  are  included  for  both  N— moment  and 
Y— force.   However  these  points  are  not  shown  on  Figures 
26  and  27  respectively.   Computer  program  III  shows  the 
program  necessary  for  a  two— dimensional  interpolation  in 
two  separate  arrays  for  N— moment  and  Y— force  respectively. 
It  is  mentioned  that  the  longitudinal  separation  distance 
(a)  can  give  negative  or  positive  values  but  the  lateral 
distance  between  ships  (3)  is  restricted  to  positive 
values  only.   Figure  28  shows  the  geometry  as  far  as 
longitudinal  and  lateral  separation  distances  are  con- 
cerned.  It  should  also  be  mentioned  that  in  phase  I 
interaction  moments  and  forces  are  applied  only  to 
ship  A  (see  Figures  26,  27,  28)  which  corresponds  to 
the  leading  ship  because  the  data  curves  for  the 
interaction  effects  are  such.   To  apply  interaction 
moments  and  forces  to  ship  B,  which  corresponds  to  the 
tracking  ship,  the  longitudinal  separation  distance 
should  be  sign  inverted  in  order  for  it  to  give  the 
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a 

Figure  26.   Dimensionless  N  Moment  vs.  Longitudinal  Separa- 
tion . 
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Dimensionless  Y  Force  vs.  Longitudinal 
Separation. 


95 


— !—  B- 


•~>- 


A 


P 


t-fc- 


r'» 


<V 


Figure  28. 


Geometry  of  longitudinal  and  lateral  separa- 
tion distances. 


appropriate  value  for  M  and  Y  respectively.   M  and  Y 
are  vectors  with  opposite  direction  in  the  case  of  ship 
B  as  compared  with  those  applied  to  ship  A.   Ships  A 
and  B  are  defined  in  Figures  26,  27,  28. 

C.   MEASUREMENT  OF  LONGITUDINAL  AND  LATERAL 
SEPARATION  DISTANCE 

1 .   Longitudinal  Distance 

To  measure  the  longitudinal  distance,  a,  between 

midships  the  following  equation  must  be  used: 

a  =  x    —  x 

°1     °2 


or 


— a  =  x   —  x 

°2     °1 


(VI-1) 


substituting  in  this  equation: 


a  =  a  a 


m 


:    =  x    x 
2      2    2m 


x    =  x    x 
°n     o,   o, 
1      1    lm 

where  x    ,x    ,  a   are  the  maximum  expected  values  of 
o„    o,     m 
2m    lm 

these  variables  respectively,  and  x   ,x   , a  are  the 

°1   °2 
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scaled  variables  whose  values  range  from  —1  to  +1.   Hence 
equations  (VI— 1)  become: 


—a  a   =  x   x    —  x   x 
m    o„  o0      o,  o, 
2   2m      1   lm 


(VI-2) 


or 


Choosing: 


x 

o„ 
—    r   2m,  — 

—a  =  [ J  x 

a      o„ 
m      2 


a  =  550  ft 
m 

x    =  550  ft 
2m 


x    =  550  ft 
lm 


x 


lm,  — 

]  x 

a     o, 

m      1 


(VI-3) 


equation  (VI— 2)  becomes 


—a  =  x    —  x 

°2     °1 


(VI-4) 


Figure    29    shows    the   analog    patching    diagram   necessary    for 
equation    (VI— 4) 


FROM  A057    0*Qi 


-c< 


L^  -  T5-0  3--(5) 


-Xc 


-o  FfcOfA  Ao^ 


Figure  29.   Longitudinal  distance  analog  diagram. 

2.   Lateral  Distance 

To  measure  the  lateral  side— to— side  distance  be- 
tween ships  the  following  equation  must  be  used: 
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3  =  y   -  y 


or 


•3  =  y   -  y 

°1     °2 


(VI-5) 


substituting  in  this  equation: 

3=33 


m 

y   =  y  y 

1  1   lm 

y   =  y  y 

Jo0    Jo„Jo„ 

2  2   2m 

where:   y    ,  y    ,3   are  the  maximum  expected  values  of 
;o,    Jo0     m  ^ 

lm     2m 

these  variables  respectively,  and  y   ,  y   ,3  are  the 

•  o1        o2 

scaled  variables  whose  values  range  from  —1  to  +1.   Hence 


equation  (VI— 4)  can  be  written  as: 


— 3  3  =  y   y   —  y   y 

lm   1      2n   2 


(VI-6) 


or 


y         y 

—    ,      lm,  —      r   2m,  — 

-B  =  l-g-1  y   -  I-g— l  y 

Mm      1      m      2 


(VI-7) 


Choosing 


3   =  100  ft 
m 


o 


2m 


=  160  ft 


160  ft 


'lm 


equation  (VI— 7)  can  be  written  as: 


FROM 

A065  ^--2- 


FftOM       y0 

f\051    o  [?oSZ 


(VI-8) 


I»  Viccrci-Cv- 


„To     AO^f  c/.v,ol    flo66 


Figure  30.   Lateral  distance  analog  diagram 
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Figure  30  shows  the  analog  patching  diagram  needed  for 

equation  (VI— 8) . 

It  should  be  noted  at  this  point  that  because 

the  coefficients  of  y    and  y    in  equation  (VI— 8)  are 

°1       °2 
greater  than  1,  the  pots  are  set  as  follows: 

P040  =  0.1600  into  a  gain  of  10 
P052  =  0.1600  into  a  gain  of  10 
During  the  simulation  3  can  take  neg-ative  values 
but  the  data  curves  are  given  for  positive  values  of  3 
only.   Thus  in  some  way  an  absolute  value  should  be  pro- 
vided either  by  digital  subroutine  ABS  or  by  analog— patch- 
ing configuration.   The  latter  is  chosen  since  the  use  of 
digital  machine  adds  time  delay  in  the  simulation  which 
may  give  rise  to  an  error  roughly  of  5%. 

WotA    4 OSS  <dL 


FRO/yi  /}o56     -P  \ 


tr-  X>i  o\  t,«  C  inpuJt 


Figure  31a.   Absolute  value  patching  diagram  of  |3|- 

Figure  31a  shows  the  analog  patching  diagram  neces- 
sary to  obtain  the  absolute  value  of  3  • 

It  should  be  noted  that  in  Figure  31a  in  the  second 
input  of  A024  summer  the  gain  is  10  but  since:  P405  =  0.2000 
the  gain  becomes  finally  equal  to  2.   Also  the  limiter  L  10 
limits  the  output  of  A066  to  negative  values.   More  speci- 
fically — 13|  corresponds  to  +1  computer  unit  limit  and 
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+  |3|  corresponds  to  —1  computer  unit  limit  respectively. 
However  according  to  the  following  illustrated  fact: 

£,.  a (  ry  )  — 


-'-, 


ft 


*-G> 


tout 


OuL 


*~  <3vJ>.V\\      CX  i-  C<  *  $  o< 


there  is  a  better  way  of  getting  a  gain  of  2  since  two 
resistors  of  value  1.0  M  in  parallel  gives  a  value  of  0.5 
as  value  of  input  resistor  which  corresponds,  to  a  gain  of 
2  as  shown  next  in  Figure  31b. 


»  Ptfttfca^     inpu.t 


FRo/A/«o56    „""(,, 

(j 

pprtM   tn>-.c    0-l                  ^ 

4 

\L10 

T  507-^7) 


Figure  31b.   Absolute  value  patching  diagram  of  3. 

Finally  the  way  of  Figure  31b  is  chosen  being  more  compact, 

D.   APPLICATION  OF  INTERACTION  MOMENT  N  AND  FORCE  Y 
TO  SHIP  A  (LEADING  SHIP) 

1 .   Introductory  Discussion 

Ship  No  2  is  chosen  arbitrarily  to  be  the  ship  A, 
that  is  the  leading  ship,  on  which  moments  and  forces  due 
to  interaction  effects  would  be  applied.   Figure  32  illus- 
trates the  way  N  moment  and  Y  force  are  interpreted  by 
hybrid  operation  of  the  machines. 

The  digital  program  which  takes  as  data  the  values  of 
6,  a,  in  the  computer  mode  of  hybrid  operation,  finds  the 
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FROM  T505 


FROMT507 

CO 
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INTERPOL  A TXO/J     PROGRAM 


>AC 

z  To  M5-w 


A;  To  T^i-(i) 


>   To   TW7-(3) 

£Tg  TWS-W 


Figure  32a.   Interpretation  of  N— moment  and  Y— force  for 
hybrid  computer  operation. 


corresponded  values  of  N  and  Y  and  then  gives  back  to  the 
analog  the  values  of  N  and  Y,  which  are  scaled  quantities, 
takes  care  of: 

a.  Rescaling  of  3,  a  since  3  =  1.0  and  a  =  1.0 
corresponds  to  100  ft  and  550  ft  respectively. 

b.  Making  linear  interpolation  in  the  two- 
dimensional  array.   So  it  finds  the  corres- 
ponded nondimensional  quantities  of  N'  and  Y'. 

c.  Since,  from  the  data  curves,  Figures  26,  27, 

N1     =  44.5  x  10~5 
max 


Y' 


max 


90.0  x  10 


-5 


N 


max 


hence,  finding  the  dimensional  values  of  N1 

and  Y '     namely 
max 

=  N'     x  ^pL3u2  =  44.5  x  10~5x  9.428x  10  ° 
max    2     o 

=  4.195  x  107  lbs-ft 


max 
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and  Y     =  Y1     x  JpL  u 

max      max    2     o 

=  90.0  x  10~5x  17.87  x  107=1.608  x  105lbs 
=  72.9  tons 

d.  Finding  from  N1  and  Y1  the  dimensional  values 

of  N'  and  Y'  respectively  as  follows: 

N  =  N*x  ~pL3u2  =  N'  x  9.428  x  1010 
2     o 

Y  =  Y'x  ^-pL2u2  =  Y'  x  17.87  x  107 
2K    o 

e.  Scaling  both  N  and  Y  quantities  taking  in 

consideration  the  fact  that  the  subroutine 

DAC  multiplies  each  number  given  to  the  analog 

terminal  by  a  factor  of  100  i.e.  it  converts 

in  computer  units,  so: 

NSCALE  =  N/N 

max 

YSCALE  =  Y/Y 

max 

Computer  program  VA  contains  the  source  deck  as 
well  as  the  potentiometer  values  and  amplifier  addresses 
used  for  phase  I. 

Computer  program  VB  contains  the  source  deck  used 

for  phase  I,  but  ship  A  (leading  ship)  was  in  that  case 

the  second  model  of  the  Mariner.   The  difference  was  only 

in  the  trunk  lines  which  were  used  in  the  previouse  case. 

In  Figure  32  the  trunk  lines  T426,  T427  belong  to  the  ship 

model  No  1. 

2 .   Dynamical  Representation  of  Interaction  Moment 
and  Force— Analog  Programming 

Recalling  Newton's  laws  of  motion,  equation  (III— 1) 

and  since  the  study  is  done  for  the  ship  to  be  in  3  degrees 
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of  freedom,  equations  (III— 6),  (V— 1) ,  (V— 4),  the  applica- 
tion of  the  external  interaction  N— moment  and  Y— force  are 
going  to  be  an  additional  term  in  the  yaw  and  sway  equa- 
tion respectively.   Considering  the  dimensional  form  of 
the  linearized  equations  of  motion,  equations  (V— 4)  will 
become  for  ship  No  2 

X   u                     X    fin 
t         r   u  iri-i    -■*    .     r    n     m,    7-         _ 
u   =    [— =r — ]    u    +     [— ]     Sn    ,    Surge 

21  u21 

-           Y   v                  (Y,-mu    )iL         _  Y.,M         _ 

•          ,   v  m,    —    r      ib        o    rm,     ,     ,     x    ip   itu     ., 
U  =    [  — — ]    v    [ — \ ]     \\>    +     [-x — ]     ^ 

u21  J;2  2  u22 

Y_6R  Yx    6n 

r    oR     m,    -~m         r    6n      m,    -r-     .       Y  _ 

+    [-pj ]     6R   +     [ — _- ]     Sn   +   - —  ,    Sway 

u22  u22  22 

i I 

additional  term 

N  v         N.iL    _     N,v 
it-    r  v  m,  —  ,  r  rm,  ,  ,  r  v  m,  — 

V  =   [-p; ]  V  +   [-£ ]   lP  -1-   [— ]  V 

u23  23         u23 

N.n6R  N  6n 

r  OR  m,  ~r=     ,  ,  n  m,  -rr-  ,   N     ., 
+  [-— ]  6R  +  [— ]  6n  +  - —   ,  Yaw 

23  23        i  23, 

additional  term 

(VI-9) 

where:     D~,  =  (m-X.)u   =  1.07  x  10   lbs 

21  urn 

D00  =  (m-Y.)v   =  1.864  x  106lbs 

22  v   m 

D00  =  (I  — N., )  ip  =  2.777  x  107lbs-ft 

23  z   yj  rm 

Y  =  interaction  force 
N  =  interaction  moment 
It  is  clear  from  equation  (VI— 9)  that  the  surge 
equation  remains  unchanged  to  interaction  effects  and 
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only  sway  and  yaw  equations  have  each  of  them  one  addi- 
tional term  respectively.   Thus  for  the  analog  program- 
ming of  equation  (VI— 9)  it  is  only  necessary  to  add  the 
circuitry  shown  in  Figure  33a  to  the  patching  diagram 
of  Figure  19b.   Note  in  this  Figure: 


P042    = 


Nmax         =    4.195x10 
D23xl°         2.777X101 


=  0.1511 


Here  there  is  a  factor  of  division  by  10  since  the  value 

(N   r/D0-.)  >  1  and  so  it  is  necessary  to  feed  amplifier 
max  z.  i 

A036  in  a  gain  of  10.   Note  that  since  in  amplifier  A036 
we  need  one  more,  not  available,  input  gain  of  10,  a 
separate  internal  resistor  of  0.1  M^  is  used  through  the 
summing  junction  (SJ)  of  A036  giving  the  required  gain  of 
10.   Also: 

P017  =  5^  =  1-608xl°5  -  0.1581 


1) 


22 


1.017x10 


Into  S'JAO^ 


T>{uit<x4L      output 

t'4-j?;?  -  (3) 


lo  vtcorcLCV--«» <Qi'J7 


-r»r2.3>-   (4-) 


Figure  33a.   Analog  Diagram  programming  of  interaction 
N— moment  and  Y— force  for  ship  A  (No  2) . 
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For  the  ship  model  No  1  the  analog  patching  cir- 
cuitry of  Figure  33b  was  added  to  this  of  Figure  19a 
whenever  it  was  desired  to  be  used  as  leading  ship  and 
ship  model  No  1  to  be  used  as  tracking  ship  respectively. 


\o  \recovdev  ^.,,,   ..^opp- 


oAHSi. 


Into  $006 


io  recorder  <« — L<, 


««S— 


XI 

Pol' 


-y 


l>LoltoJL  outouX 


P l  o  ufcct»  t    cuXp  tOu 

T*hJZ7-(8) 


Figure  33b.   Analog  diagram  programming  of  interaction 
N— moment  and  Y— force  for  ship  model  No  1. 


It  must  be  mentioned  here  that  for  Phase  II  where 

interaction  effects  have  to  be  applied  on  both  ships,  both 

the  configurations  of  Figures  33a  and  33b  must  be  used. 

3 .   Obtained  Responses  for  Phase  I 

a.   Stationary  runs  (i.e.  both  ships  have  same 
propeller  speed) 

Figure  34a, b  shows  the  obtained  linear  res- 
ponse of  the  leading  ship  (ship  A)  in  terms  of  the  calcu- 
lated parameters  Y,  N,  y  ,  a,  3/  v,  v,  ty    . 

Originally  the  leading  ship  was  placed  at  the 
origin  of  the  space  coordinate  system  (x  rYQ)  an<3  the 
tracking  ship  was  placed  at  x   =  +524  ft  and  y   =  +70  ft. 
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Figure  34b.   Linear  response  of  leading  ship  for  Phase  I. 
(AR=0,  6n=0,  a=+524  ft,  3=  70  ft) 
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Then  both  the  ships  were  left  to  run  with  the  same  propel- 
ler speed  which  was  15  knots.   The  same  speed  of  15  knots 
was  assumed  for  the  origin  of  the  space  coordinate  system 

The  leading  ship  was  forced  to  yaw  to  positive 
yaw  angle  due  to  the  additional  term  of  the  interaction 
moment  N.   The  interaction  force  Y  produced  a  lateral  ac- 
celeration and  lateral  velocity  which  forced-  the  leading 
ship  to  move  laterally  decreasing  continuously  the  lateral 
separation  distance.   In  the  sway  equation  (VI— 9)  not  only 

the  Y—  force  term  was  acting  but  the  derivatives  Y  ,Y,,Y., 

v   ip  [u 

were  producing  additives  effects  since  due  to  the  yaw 

angle  a  change  of  yaw  angle  and  rate  of  yaw  angle  change 

were  obtained.   It  is  also  noted  that  the  interaction  force 

Y  and  moment  N  are  slightly  increased  during  the  run  since 

the  lateral  separation  was  decreasing.   Similar  results 

were  obtained  for  the  second  run  in  which  the  leading  ship 

was  again  placed  originally  at  the  origin  of  (x  ,y  )  axes 

and  the  tracking  at  x   =  —524  ft  and  y   =  +70  ft.   Again 

3      o  J  o  J 

the  origin  of  the (x  ,y  )  was  moving  at  15  knots  as  well  as 
both  the  leading  and  tracking  ship.   The  response  was 
calculated  in  terms  of  the  perturbed  parameters,  ijj,y,N,a, 
B,v,v  as  shown  in  Figure  35.   The  lateral  distance  during 
this  second  run  was  decreasing  faster  since  the  values 
for  interaction  force— Y  and  moment— N  were  greater.   Ob- 
viously from  the  data  curves  both  force  Y  and  moment  N 
are  not  symmetrical  about  the  origin. 
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Figure  36  shows  the  response  of  the  leading 
ship  when  the  longitudinal  distance  and  the  lateral  dis- 
tance were  set  equal  to  zero  and  70  feet  respectively  at 
the  beginning  of  the  run.   Now  because  the  longitudinal 
distance  is  zero,  the  Y— force  and  N— moment  have  :iot  only 
greater  values  than  previously  but  the  leading  ship  yaws 
to  negative  yaw  angles.   This  has  as  effect  a  negative 
lateral  velocity  and  an  acceleration  initially  which 
eventually  reduces  the  interaction  force— Y  and  moment— N 
drastically,  but  the  lateral  distance  is  increasing  now 
since  the  velocity  along  the  y  —axis  has  opposite  sign. 

For  all  the  above  three  responses  the  rudder 
for  both  the  ships  was  set  at  zero,  i.e.  =  0.   It  should 
be  noted  at  this  point  that  the  hybrid  simulation  program 
(computer  program  V)  was  made  to  work  between  lateral 
separation  distances  100  ft  and  50  ft  since  data  are  given 
for  this  range.   The  increase  of  the  lateral  distance  is 
due : 

a.  To  the  negative  yaw  angle.   From  equation  (V— 2) 
it  seems  that  eventually  the  term  (u  sin  \p) 
becomes  predominant  over  the  term  (u  cos  i/j ) 
hence  even  if  a  positive  value  is  obtained  for 
the  v  velocity  a  negative  value  of  y   is 
actually  applied  to  the  leading  ship. 

b.  The  negative  yaw  angle  is  obtained  because  for 
a=0,  3=70  ft  a  negative  moment  N  is  applied. 

It  has  been  mentioned  previously  that  the  two 

models  are  identical.   So  for  Phase  I  No  2  model  has  chosen 

to  be  ship  A,  i.e.  leading  ship.   To  complete  our  work  for 
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Phase  I  and  check  the  wiring  for  model  No  1  the  case  was 
reversed  and  ship  A  was  the  No  1  model  and  ship  B  the  No  2 
model.   Remember  ship  B  is  always  the  tracking  ship.   For 
this  last  case  a  change  in  wiring  on  the  analog  board  was 
made  for  the  circuit  representing  the  absolute  value  of 
the  lateral  separation  distance  (3)-   The  change  was  due 
to  the  lack  of  operation  of  the  limiter  L  10  as  was  shown 
in  Figure  31a  and  31b. 

The  following  configuration  is  used  from  now 
on  for  the  absolute  value  of  the  lateral  distance  (3)  as 
is  next  shown  in  Figure  37. 
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Figure  37.   Absolute  value  patching  diagram  of  the  lateral 
distance. 

Just  briefly  is  mentioned  that  it  is  desired 

to  keep  the  voltage  of  point  A  between  the  limits  0  and  — °°. 

This  is  because  diodes  D  ,  D   are  connected  in  such  a  way. 

12 

Now  when  point  C  has  a  positive  voltage  D,  is  OFF  and 
point  B  has  a  negative  voltage  hence  point  A  has  a  positive 
voltage  since  D„  is  conducting.   When  point  C  is  negative, 
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voltage  D,  is  ON  and  B  has  about  0  or  +0.5  volts  voltage 

which  is  not  enough  to  break  down  D„  hence  point  A  is  at 

zero  voltage. 

Figures  38  and  39  show  the  obtained  response 

for  the  leading  ship,  when  the  longitudinal  distance  is 

+400  feet  and  —400  feet  and  the  lateral  distance  +70  feet 

from  the  tracking  ship.   The  response  was  obtained  in 

terms  of  the  perturbated  parameters  \0 ,  y,  N,  y  ,  a,  3, 

o 

v,  v  .   The  ships  were  moving  at  the  same  speed  of  15  knots 

with  the  leading  ship  placed  at  the  origin  of  the  (x  ,y  ) 

axis.   In  Figure  38  the  tracking  ship  position  was  at  x   = 

+400  ft  and  y   =  +70.   The  interaction  force  — Y  was  almost 
J  o 

zero  during  the  time  of  this  run,  while  the  interaction 
moment  -~N  had  a  positive  value  producing  a  positive  yaw 
angle.   Because  y   was  positive  the  track  of  the  leading 
ship  reduced  the  lateral  distance  (3). 

Similar  discussion  can  be  made  for  the  response 
of  Figure  39  where  the  tracking  ship  was  placed  at  x   = 

—400  feet  and  y   -  70  feet.   The  lateral  distance  was  again 

J  o 

reduced  continuously. 

Several  "stationary"  runs,  i.e.  at  the  same 
speed  of  15  knots  for  both  the  ships,  were  made  for  the 
longitudinal  distance  (a)  being  160  ft,  300  ft,  200  ft  and 
the  lateral  distance  (3)  70  ft,  respectively.   Figures  40, 
41,  42,  43,  44,  45  show  these  responses  in  terms  of  the 
perturbated  parameters  of  the  leading  ship,  \b  ,  Y  ,N,y  ,  a  ,  3  / 
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Figure  41-2.   Linear  response  of  the  leading  ship  for 

Phase  I.   (AR=Of  6n=0,  a=+160ft,  3=+70ft) 


118 


O 

1 

i- 

; 

"     — 

O 

• 

^ 

■ 

r. 

'  Av 

JN 

o 

K 

\0 

+ 

H 1 1- 


<o 

1 



— 

- 

- 

— — 





-  -  j 

, 

«> 

»■ 

1 

i 

a— 
i-    / 

o 

-4~ 

\ — I — I — I — I — I — !-*9-HLr*! — H 


1      !— H 1 1 1 1 — <"-HJH*H — 

^vlj\ 

v> 

> 

hT 

i 

gto 

--■■—- 

--■■-&--.--■ 

o 

v/) 

+  i- 

■ 



~^. 

: 

~i 

5 

r 

> 

t 

' 

o 

J 

rfc- 



- 

• 

H 


<D 

w 

d 

x: 

pq 

n 

0 

4-1 

O 

■H 

£ 

W  . 

+J 

tr>4-j 

G 

o 

•H 

> 

•a 

+ 

(d 

II 

0) 

ca 

rH 

«. 

(D 

+J 

rC      ^ 

4-> 

o 

o 

4-1 

m 

0 

1 

ii 

CD 

S3 

W 

ti 

0 

•> 

0,0 

to 

II 

<D 

n 

u 

<o 

u 

^ 

rO 

o 

a) 

II 

c 

« 

•H 

< 

J 

* 

• 

(N 

<tf 

CD 

H 

3 

tr> 

•H 

Pn 

1 — I — I — I — I — I — I — I — I — I — I — I— I, 


119 


' 

8 

■ 

y 

& 

K^ 

J 

u 

■3 

0 

• 

- 

— 

i 

■ 

- 

0 

-\ — I — I — I — h 


•> 


C4 


n 


S3 


m 


F—ii^ 


yr^ 


-3L 


o 

I 


:zr 


> 

■N 

.- 

> 

^ 

3 

5E 

1 

« 

i- 

0 

-:-  ■ 

-1 — 1 — 1 — 1 — 1 — 1 — 1 — \—\ — 1 — 1 — 1 — 1 — 1 

1 — 

_  _ 

- 

— 

" 

1 

p 

=?h 

PL 

0, 

■ 

■ — — 

— 

O 

i2 

-h« 

r  . 

1 ~ 

1 — 

1 — 

h— 

1 — 

r  ' — 

1 

1 

1 

h— 

1 — 

1 

1 

1 

O 

O  1 

7 

1 — 

• 

^ 

t" 

"3    " 
J- 

0 

- 

8 

♦ 

H 


CO 

fd 

A 

PM 

M 

0 

IH 

0* 

•H 

jc 

CO 

tr>4-> 

a 

m 

•H 

t3 

0 

rC  r- 

CD 

ii 

rH 

QQ 

d) 

*. 

,C 

+J 

4J 

4-) 

O 

M-l 

O 

0 

ro 

+ 

0) 

1! 

CO 

3 

c 

0 

K 

0.0 

CO 

il 

CD 

C 

M 

'O 

u 

V 

fd 

O 

(U 

II 

c 

« 

•H 

< 

J 

ro 

•^ 

d) 

^ 

3 

tP 

•H 

fa 

H- 


H — I — I — I- 


120 


- 

- 

ft 

1 

I 

'•+< 

>- 

■ 

o 

Ifl — 

i 

■ 

-V- 

1 

■ 

- 

•S. 

^J 

^j" 

- 

r 
r 

- 

o 

= 

1 
-      .j. — 

■c — s. 

-    - 

«*a 

■««-' 

1 1 

; 

h 

^> 

HTJ 

1 

>v 

,--. 

1 

- 

=. 

= 

- 

- 

—— i 

— -i 

_    <T 

■3 

* — 1 

' 

o 

L 

3- 

+  - 

P 

■ 

r 

1 

o 
1 

o 

-^-= 

l_ 

1 

t 

1 

00 

+ 

— 

v»-_ 

— : 

3 

►»»     - 

3^ 

1 



— 

--■ 

_ 

0 

- 

- 

. 

H 


CD 

W 

ra 

^C 

PM 

^ 

0 

4-1 

a 

•H 

.c 

w 

,^-s, 

tT>4-> 

c 

m 

•H 

o 

M 

r» 

(d 

+ 

CD 

II 

iH 

QQ 

0) 

^ 

X! 

-P 

-P 

M-l 

O 

m 

O 

o 

CN 

+ 

© 

II 

CO 

« 

G 

0 

*. 

ao 

w 

II 

CD 

a 

u 

<o 

u 

K 

(6 

O 

CD 

II 

r; 

D=3 

•H 

< 

h-3 

N-' 

"3* 

CD 
P 

•H 

Em 


121 


Figure  44-2.   Linear  response  of  the  leading  ship  for 

Phase  I.   (AR=0,  6n=0,  a=+200ft,  3=+70ft) 


122 


: 

- 

- 

O 

v> 

1     _ 

__,_ 

v 

^ 

* 

.     ■ 

u 

b- 

0 

^  r 

T 
1 

1        1        1        1        1        1        1        1        1        1        1        1        1        1 

- 

\rt  ... 

1 

-- 

'•> 

?: 

a 

wo 

"+- 

t   M 

1 

1 

■     ■ 

— - 

^ 

~ 

0 

:  — = 

— 

^ 

■ 

1 

1 

0 
1 

1 

— 

> 

m 

1 

1 

— -p* 

n 

cO 

+ 

1 

1 
1 

5^ 

0 

S 

^ 

^ 

< 

VI 

H 


a> 

Ul    OKI) 

c  c  w 

0  -h  fd    » 

o.ts  .c  0 

to    fO   Ph    II 

QJ    CU          C 

»- 

^    rH     M    <0 

4-1 

. — . 

O 

4-J 

+j 

U    <D  M-l      - 

O 

m 

fd  .c      0 

c  • 

0 

a)  -j-i  cu  11 

CN 

r>- 

C         -H   « 

! 

+ 

•H  4-1  ^  <3 

II 

II 

i-l   O   w  •— 

a 

CQ 

ID 

d) 

tn 
•H 
Cm 


-H \ — 1- — 1 — 1 1 1 1 1 1 h— 1 1 — h 

^N 

~r 

$ 

O 

O 

H^ 

^ 

■U 

K— " 

- 

-' 

O 

: 

-"'- 

0  , 
■f- 

■ — 

h— 

1 

1 1 

1 1 

1 1 

1 — 1 

1 — 

, — 1 

, — 1 

r— ) 

4-^ 



1 h 

J 

1 

S 

^« 

53fez 

; 

0 

+  T 

^_ 

123 


v,v.   The  analysis  of  these  response  curves  is  analogous 
to  the  previous  ones.   The  lateral  distance  in  some  cases 
is  reduced  and  others  increased  by  the  interaction  effects 
depending  on  the  relative  longitudinal  position  of  the 
ships  since  the  lateral  distances  were  kept  constant  at 
70  ft  at  the  beginning  of  each  run. 

From  the  observation  of  these  "stationary"  runs 
it  seems  that,  there  are  positions  where  both  the  interac- 
tion force  and  moment  acting  on  the  leading  ship  tend  to 
draw  the  leading  ship  towards  the  tracking  ship.   Such  posi- 
tions seem  to  be  at  the  longitudinal  distances  of  524  ft, 
400  ft  and  300  ft. 

An  interesting  effect  was  observed  when  the 
longitudinal  distance  is  +2  00  ft  and  the  lateral  distance 
+70  ft,  Figure  44.   Although  the  interaction  force— Y  and 
moment— N  had  both  positive  values  they  did  not  affect  the 
lateral  distance  ($)  throughout  the  time  of  the  run  (2 
minutes  roughly)  because  the  interaction  effects  counter- 
acted each  other,  due  to  the  fact  that  the  positive  inter- 
action moment  was  producing  a  yaw  positive  angle  such  as 

to  counteract  the  positive  interaction  force.   The  the  y 

^  o 

velocity  of  the  leading  ship  was  zero  in  this  case  and  so 
the  lateral  distance  could  be  kept  constant.   At  this  point 
for  the  ease  of  the  manual  control  the  input  voltage  into 
the  steering  control  block  and  into  the  propeller  speed 
blcok  is  changed  as  Figure  4  6  shows  for  ship  model  No  1  and 
Figure  47  shows  for  ship  model  No  2. 
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Figure  46.   Rudder  and  propeller  input  commands  diagrams 
for  ship  model  No  1. 
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Figure  47.   Rudder  and  propeller  input  commands  diagrams 
for  ship  model  No  2. 


Those  analog  configurations  shown  on  Figures 
46  and  47  for  both  ship  models  respectively  replace  the  up 
till  now  used  configuration.   This  is  done  primarily  because 
one  can  have  negative  or  positive  rudder  and  propeller 
speed  changes  without  necessarily  changing  the  switch  posi- 
tion.  This  obviously  gives  operative  flexibility  for  the 
operator  making  the  control  of  the  ship  more  realistic 
besides  the  necessary  required  sensitivity  of  the  rudder 
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wheel  and  propeller.   Then  for  zero  rudder  or  piropeller 
speed  change  either  the  corresponding  switch  has  to  be  open 
or  the  corresponding  potentiometer  has  to  be  set  at  0.5000 
value.   For  example  for  the  rudder  angle  will  be  5  turns 
for  0  to  20°  and  5  turns  0  to  —20°  which  corresponds  to  4° 
per  turn.   Likewise  it  will  be  5  turns  for  0  to  +  30  RPM 
hence  it  will  correspond  to  6  RPM  per  turn.   For  the  ease 
of  operation  the  potentiometer  values  for  P437,  P406,  P416, 
P406  should  be  set  in  "RESET"  mode  having  in  mind  that  100.0 
volts  corresponds  to  20°  rudder  and  30  RPM  of  propeller 
speed  respectively.   This  avoids  the  confusion  of  converting 
in  "POTSET"  mode  the  potentiometer  values  to  be  set  in 
actual  volts  since  now  the  0.5000  position  of  the  potentio- 
meters corresponds  to  zero  volts. 

b.   Runs  with  different  propeller  speed  between 

ship  A  (leading  ship)  and  ship  B (tracking  ship) 

Two  kinds  of  runs  were  made,  one  with  the  track- 
ing ship  have  a  speed  of  +10  RPM  greater  than  the  speed  of 
15  knots  of  the  leading  ship.   In  the  second  run  the  differ- 
ence in  propeller  speed  was  5  RPM.   Note  that  no  controls 
were  applied.   The  following  assumption  was  made:  both  ships 
can  be  placed  at  any  desired  initial  position  at  the  begin- 
ning of  the  run.   This  was  done  because  no  complete  run  with 
the  tracking  ship  passing  the  leading  ship  was  possible  to 
be  made  primarily  for  two  reasons: 

(1)  Saturation  effects  of  the  analog  computer 
amplifiers . 

(2)  Interaction  effects  can  bo  applied  only 
for  the  lateral  distance  being  between 
50  ft  and  100  ft. 
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This  assumption  holds  for  Phase  II  also.   A  matter  of  fu- 
ture investigation  would  be  a  rescaling  of  the  analog  com- 
puter unit  to  avoid  the  saturation  effects.   Also  more 
data  should  be  available  for  the  interaction  effects  to 
be  applied  for  lateral  distances  outside,  the  range  of  50 
to  100  ft.   Nevertheless  the  tracking  ship  was  placed  at 
different  initial  longitudinal  distances  from  —524  ft  to 
+524  ft.   All  the  responses  of  the  leading  ship  for  Phase 
I  were  calculated  in  terms  of  the  perturbated  parameters 
of  the  leading  ship  i|),Y,N,y  , a,3,v,v.   From  the  observa- 
tions of  the  obtained  responses,  Figure  48  to  Figure  64, 
it  can  be  seen  that  during  the  approach  and  the  departure 
of  the  tracking  ship  the  leading  ship  tends  to  reduce  the 
lateral  distance,  3.   So  a  possibility  of  collision  appears, 
More  specifically  the  tracking  ship  starts  at  —524  ft  longi- 
tudinal distance  with  10  RPM  propeller  speed  greater  than 
that  of  15  knots  and  tries  to  overtake  the  leading  ship, 
Figure  43.   Due  to  interaction  moment  N  the  leading  ship 
yaws  to  a  positive  angle  and  so  tends  to  reduce  the  lateral 
distance,  3,  although  the  interaction  force  Y  is  negative. 
In  Figure  49,  the  next  run,  the  tracking  ship  starts  to 
overtake  the  leading  ship  at  a  longitudinal  distance  of 
—400  ft  with  10  RPM  propeller  speed  greater  than  that  of 
the  leading  ship.   It  can  be  seen  that  originally  the  yaw 
angle  is  positive  due  to  the  positive  interaction  moment 
and  the  lateral  distance  is  decreasing  again.   This  in  fact 
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Figure    49  . 


Linear  response  of  the  leading  ship  for 
Phase  I  (AR=0,  Sn=+10  RPM,  initially 
a=-400ft,  $=100ft) 
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is  happening  because  the  bow  of  the  leading  ship  yaws  to- 
wards the  oncoming  tracking  ship.   When  the  longitudinal 
distance  is  reduced  to  —200  ft  the  leading  ship  starts  to 
yaw  at  a  negative  angle;  this  is  because  both  the  Y— force 
and  N— moment  changed  sign,  hence  the  lateral  distance  be- 
ing unchanged  for  about  15  sec  at  50  ft  approximately, 
starts  to  increase  toward  100  ft  when  the  longitudinal 
distance  is  approximately  160  ft. 

In  the  next  shown  run,  Figure  50,  similar  analy- 
sis can  be  made  except  from  the  fact  that  the  tracking  ship 

now  starts  at  initial  position  at  x   =  —300  ft  and  y   = 

^  o  J  o 

+50  ft.   The  lateral  distance  being  50  ft  for  about  15  sec 
starts  to  increase  when  the  longitudinal  distance  is  approxi- 
mately -200  ft. 

Figure  51  shows  the  response  for  an  initial 
position  of  the  leading  ship  at  (0,0)  and  the  tracking  ship 
at  (0,50  ft).   The  tracking  ship  possesses  a  15  RMP  greater 
propeller  speed  than  that  of  15  knots.   The  leading  ship 
immediately  starts  to  yaw  negatively  and  thus  increases  the 
lateral  distance  drastically. 

In  Figure  52,  where  initially  a  =  +160  ft  and 
3  =  70  ft  it  is  seen  that  the  lateral  distance  increases 
until  the  longitudinal  distance  is  +200  ft.   Then  due  to 
the  interaction  effects  the  leading  ship  reduces  the 
lateral  distance,  since  a  positive  y   velocity  has  been 
created. 
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Figures  53,  54,  55  show  the  response  of  the 
leading  ship  when  a  and  3   were  initially  set  at  +300  ft, 
+400  ft,  +524  ft,  and  70  ft  respectively,  at  5  RPM  differ- 
ence in  propeller  speed.   It  seems  that  the  best  position 
for  two  ships  of  the  same  size  is  exactly  abeam  when  along- 
side.  The  increase  of  the  lateral  distance  when  the  longi- 
tudinal distance  is  between  approximately  —200  ft  and  +200 
ft  implies  that  the  leading  ship  yaws.   Hence  control  has 
to  be  applied  for  it  to  keep  a  constant  course.   It  is  also 
obvious  that  the  approach  and  departure  of  the  tracking 
ship  implies  the  use  of  control  on  the  leading  ship  in  order 
for  it  to  avoid  collision. 

Figures  56  till  64  show  the  linear  response  of 
the  leading  ship  for  different  initial  positions  of  the 
tracking  ship  with  a  difference  of  5  RPM  in  propeller  speed. 
The  tracking  ship  overtakes  the  leading  ship,  which  has  a 
15  knots  speed.   A  similar  analysis  can  be  made  for  these 
responses  as  was  done  for  the  previously  mentioned  runs. 
4 .   Obtained  Responses  for  Phase  II 

Computer  Program  VI  shows  the  source  deck  used  for 
Phase  II.   In  Phase  II  interaction  forces  and  moments  are 
applied  on  both  ships.   The  circuitry  of  both  Figures  33a 
and  33b  is  used.   It  should  be  mentioned  here  that  the 
digital  machine  computes  for  the  leading  ship  the  inter- 
action force  and  moment  corresponding  to  those  longitudinal 
distance,  ex,  and  lateral  distance,  8,  which  the  analog  com- 
puter passes  through  the  trunk  lines  to  the  digital  computer 


135 


0 

V> 

1 

* 

^ 

u 

^> 

o 

" 

- 

- 

o 
v> 

1- 

— I 

I — 

— 

I — I 

I — 

1 1 

1 ' 

— H 

1 

— 

- 

•> 

£  ■ 

*5 

f 

o 

l        ' 

~~= 







V.1 

H 1 1 — f- 


1 — 1 

1 

1 

— 1 

— H 

— I 

— I 

1 

•v 

- 

- 

s 

■  1 

.  J 

_l 

s 

-_  _ 

6 

o 

- 



J- 

^ 

3 

+" 

1 — 1 1 H§ 

^sb-4 — 1 — 1 — 1- 

srk 

r 

« 

J 

o 

1 

•> 

-*jT 

33B 

.. 

, 

0 

■ 

1 

' 

= 

.+_ 

*0 

o 

-J. 

E 

■F 

O 

1 1 1 h-^I 

^2f_i , , , — 

>, 


,-:-J 


DJ 


o~> 


j 

—- L' 

Is 

4A— 

1 

s 

H^" 

- 

f^ 

0 

^ 

1 

+ 

1 — \— i — 1 — 1 — 1 — 1 — 1— 1 — H 

| 

\T> 

H* 

7 

5 

^ 

! 

. 

- 

•  i 

0 

^j2£ 

r—< 

> 

-U-^"" 

' 

4/i 

■) — 



1 

1 

1 

1 

1 

1 

1 — 

1 

o 
o 

\~ 

- 

CO 

f= 

I 

- 

1 

S- 

p— H 

V- 

c 

3 

O 

"S 

; 

~T5~ 
o 

. 

.. 

+ 

0>   4-> 
10  "4-1 


fd   O 

X\  r- 
Pu   II 
ca 

0     - 

m   4-> 

<4-4 

O*o 

•H  O 

CO    + 

II 

•H    >i 

a  ih 

rH    -H 

CD  -H 
X\  C 
-p  -H 

M-l      » 

0   £ 

P-l 

Q)  PS 
C/J 

£  o 

O  -H 

0.+ 
cn  ii 

Q)    C 

rd  o 

0)  II 
C  PS 
•H   < 


CO 
LD 

•H 

Pn 


H — I — f- 


H h 


136 


e 

1 

v 

1 , 

0 

o 

: 

o 

+ 

r 

^ 

I 

\> 

■    ^ 

C 

0 

" 

n;;__ 

£tt* 

r 

4— 

1                 i        i        ■        i 

£s 

■  ii*       '      ' 

1 

1 

V 

\ 

'■- 

-M 

■ 

^ 

1 

-<^ 

1- 

-  -J 



1 

1 

. 

1 

; 

4-' 

1        1        1        1        1        1 

i      i      i      i 

1        1        1        1        1        1 

I      I      i      i 





— 

— 

: 

■ 

>s 

i 

1 



■ 

== 

^s* 

<JJ 

o 

o 
CO 

1; 

~  - 

1        1        1        1        1        1 

i      i      i      i 

1        1        1        1        1        1 

I      I      I      I 

' 

^r= 

1 

■ — — 

- 

7\ 

•5— 

^~> 



b. 

j 

- — 

-    i» 

o 

^. 

""" 

- 

-    - 

_> 

H 1 r- 


»> 


H 1 1  - 


J- 


c\ 


© 

■+4 


H 1 \— f£&— ♦*-* 


i: 


> 


3; 


4J 


0?L 


4 


VH' 


H 1— +- 


M 
Q)  -P 


P-i 
0 


o 


ca 


-P 

4-1 

ao 

•H  O 

.a  <* 

w  + 

ii 

tP  c5 
C 
•H    >i 

TJ    r-i 
ftf    rH 

0)    fO 

rH   -H 
4-> 

a)  -H 

xi  c 
p  -h 

<+4     ■> 

o  S 

P-I 

(D  & 

to 
C  o 

O    rH 

a  + 

Cfl    II 

rrj  o 
0)    II 

c  « 

•H  < 


ID 
Q) 

-H 

fa 


-hh — {- 


h — i — \- 


137 


- 

o 

V) 

•) 

C4 

1 

c 

,o 

j 

-©- 

1 

i 

i 

i 

1 

i 

i 

i 

w 

i 

i 

1 

i 

i 

i 

1      ■■( 

1 

— 

- 

i 

0  1 

-> 

- 

£ 

I 

i 

kJ 

r>    - 

in 

* 

: 

-4- 

1             1             1             £■""!•    I1        -  f  1    *"'     . .      1          _i             1 

1           1           1           K""*l       ^M  "*1           1         "t           \ 

"?- 

1 

0 

— ~ 

"VcV 



1  \ 

1 

> 

s 

*c 

c', 

-f 

^t 

- 

E 

III 

i 

0 

■ 

= 

1 

1 

-1 

; 

0 — 

v.- 

«n 

> 

i 

' 

^ 

^ 

- 

cv- 

1        1 

- 

EFr 

= 

T 

1      1      1      1      1      1      1      1 — 1 — 

v> 

) 

— 

g 

i 

0 

— 

~-~" 

-f 

H 


CD 

•4J 

CO 

m 

fd 

O 

£5 

r- 

Pn 

II 

CO. 

U 

0 

». 

m 

-P 

m 

a^ 

•H 

CM 

rC 

LO 

CO 

+ 

II 

tn 

a 

£ 

•H 

>. 

tS 

rH 

fO 

■H 

(D 

rd 

rH 

•H 

+J 

CD 

■H 

x: 

C 

-p 

■H 

m 

V 

0 

S 

P^ 

0 

« 

CO 

C 

o 

O 

rH 

o,+ 

w 

II 

CD 

c 

u 

<o 

u 

.. 

to 

o 

d) 

II 

c 

tf 

•H 

< 

hi 

LD 

m 

CD 

H 

3 

tr 

•H 

Pn 

138 


vk;H 


"*•*- 


I 1 1 h 


-ISi 


gg 


1 

'          1 

m  . 

- 

V 

d 

0 

=< 

■» 

N 

H- 

! 

sH- 

-, 

.              ' 

•^ 

i 

- 

o 

--' 

-' 

. 

vi 

V 

1            \n       1     -4  <\    tgl 

!         1 

1            M*       1       T>l    ^1 

1         i 

V.1 

1 

: 

~ 

= 

0 

( 

l 

■  «v 

y 

§ 

a! 

- 

K: 

V> 

- 

± 

1         1         1         1 

Q 

1 

cc* 

3 

1 

1 

— 

<>; 

'<aH-- 

o 

- 

o 
o 

1  _J 

1        1        1        1 

i 

■ 

■    -I 

1 

H 


0) 

4-) 

to 

m 

fd 

o 

JZ  o 

PH    -H 

II 

>-l 

CO. 

0 

^H 

v. 

-p 

&,M- 

■H 

^ 

jC  cm 

w 

LO 
I 

Cn 

1 
II 

c 

a 

■H 

-d 

>i 

fd 

rH 

0) 

rH 

rH 

fd 

•H 

0) 

■P 

,c 

•H 

4-1 

c 

•H 

m 

O 

». 

s 

Q) 

(^ 

to 

« 

G 

0 

LO 

D.+ 

10 

II 

<u 

C 

u 

K3 

u 

v 

cd 

o 

QJ 

II 

a 

tf 

•H 

< 

►q 

# 

<£> 

LO 

0) 

5-1 

3 

tr 

•H 

Cn 

139 


; 

O 

u 

:> 

o 

N 

■c 

« 

|p 

0 

-+- 

4HJh*H — KH — I 


—^ 

— 

O 

-co 

i 

-    . 



= 

^~~ 

'""■■■* 

— r-^i 

.  ~c 

■J 

io 

: 

V. 

. 

1 1 

— 

X 

Ho 

! 

o 

CO 

- 

L*?> 

"~~- 

o 

.  \ 

^ 

->-i 

> 

^ 

- 

^>> 

H 1 


1 — 1 

' — 1 

1 

— 1 

— 1 

1 

— ] 

1 

r 

: 

Sk 

1 

D 

0 

— 

T 

- 

1 

1 

r= 

= 

-   O 

- 

ES 

^  - 

Q 

QA 

4J 

h 

1 

c 

ifi 

0 

r 

= 

"""~~ 

"— —~ 

. 

o 
o 

- 

H 


QJ  - 

W 

P 

fO  4-1 

,C     < 

O 

PU 

^ 

II 

M 

XL 

0 

4-1 

•» 

-P 

Q* 

H 

•H 

O 

.G 

O 

03 

1 

tP 

1 

II 

C 

S 

•H 

rd 

>i 

rd 

rH 

<d 

rH 

rH 

fO 

•H 

0) 

-U 

^ 

•H 

4-> 

C 

■H 

4H 

O 

** 

s 

0) 

P-I 

en 

« 

c 

o 

m 

o.+ 

w 

II 

0) 

C 

n 

<o 

M 

^ 

id 

o 

<D 

II 

c 

rt 

-H 

< 

r-} 

• 

LT> 

(D 

n 

3 

tp 

■H 

Pm 

H — I — h 


140 


141 


gl 

8 

0, 

■3 

!     *< 

r 

jfc 

2 

-4- 

- 

151 

—  -;-!  i 

: 

~ 

. 

: 

' 

^ 

i 

(T 

- 

- 

^ 

^ 

-03 

"v 

1 

x"3 

U 

+ 

1 I 

1 

1 \—\ 1— H — 1 1 1— 

.— . 

^ 

& 

6 

- 

^ 

•i 

V 

■+1 

/ 

fc<= 

5 

"- 

-t- 



-  -_ 

ro, 

Q 

■  \- 

i-i-i-i 

^4M — 1 — 1 — 1 

1 

1 

1 

1 — 

1 — 

\ — 

t— 

1 — 1 



HO 

1 

— 

~ 

- 

*-> 
v 

>> 

b 

- 

S 

: 

- 

+■ 

J 

. 

^ 

> 

^»* 

^ 

Or 

_  _  «q 

,— -^ 

- 

W» 

- 

-•+- 

—zr 

H — h 


H — I- 


V 

i 



s. 

«5 

1 

3 

-Z 

; 

4-J 

:  ' 

■ — 

I 

. 

1 1 

1 1 

1 

1 — i 

1 1 

' 1 

1 1 

1 

■ 

— - 

-$- 

ro 

^ — 



-^7* 

.  Of- 

3 

1 

ft 

0 

—  T 

CD 

10 

rd 

,C 

ft 

*— N 

M 

4-> 

o 

4-1 

m 

O 

in 

a 

1! 

•H 

OQ. 

,a 

w 

*. 

O 

tn 

1! 

C 

8 

•H 

'd 

>i 

rd 

rH 

CD 

rH 

rH 

rd 

•H 

cu 

+J 

,C! 

•H 

+J 

C 

•H 

4-1 

o 

«. 

s 

CD 

ft 

CO 

« 

£ 

O 

LT) 

CU  + 

CO 

II 

cd 

C 

u 

K5 

u 

v 

rd 

O 

CL) 

II 

C 

« 

•H 

< 

J 

■^—^ 

t 

a\ 

m 

CD 

M 

3 

Cn 

•H 

fa 

.  I — I — I — I — I — I — I — h- 


142 


143 


0 

>: 

I 

V 

"-% 

—o- 

— 

'""""" 

■— = 

L_ 

i?. 

-h 

H 


Q) 

,—. 

W 

-P 

rd 

m 

^  o 

ft 

r- 

II 

^ 

CO. 

O 

IW 

V 

-p 

CL.I+- 

•H 

o 

.c 

o 

w 

CN 

+ 

Cn 

II 

C 

s 

■H 

T5 

>1 

rci 

rH 

a; 

rH 

rH 

nj 

•H 

a) 

+J 

X! 

■H 

+J 

a 

•H 

IW 

o 

•. 

s 

QJ 

0-t 

U) 

« 

a 

0 

in 

(X  + 

w 

II 

« 

c 

^ 

'O 

5-1 

< 

03 

o 

<D 

II 

C 

« 

■H 

<a 

i-q 

w 

a) 

M 
•H 


144 


1 — 

— 1 — 1 — 1 — 1 — 1 — 1 — t— \ 

VI 

- 

trrirE 

1 

3 

^ 

-       ' 

o 

1 

~~\ 

_. 

H 


(U 

^-^ 

w 

•P 

id 

m 

X3 

o 

Ph 

r- 

II 

u 

CQ 

o 

iw 

«. 

-P 

0,4- 

•H 

O 

.c 

o 

to 

ro 

+ 

en 

II 

c 

3 

■H 

•0 

>i 

fd 

rH 

CD 

rH 

rH 

m 

•H 

CD 

p 

.e 

•H 

4-> 

c 

•H 

m 

o 

fc. 

s 

CD 

CM 

to 

« 

C 

0 

m 

a  + 

w 

II 

a> 

CI 

5-1 

<0 

^ 

K 

fO 

o 

CD 

II 

G 

« 

•H 

< 

J 

• 

V£> 

a) 

M 

3 

Cn 

■H 

Pn 

145 


- 

£ 

i 

s 

-b 

<> 

S 

r> 

I 

~> 

0 

r 

o 

:  +• 

IT- 

1 

N 

i 

i 

c 

o 

? 

3- 

J 

-r 

-4- 

— 1 1— | 1 1 1 1 1 h 

0 

-■<J(J 
1 

- 

0 

1 £ 

Si        , 

- 

3" 

.    -_ 

=j 

— 

>v 

- 

n 

« 

~^r 

1 1 — 1 1 1 h—i — 1 h— 4 

^> 

a- 

? 

S 
3 

i 

-> 

=4 

i 
^7 

- 

- 

o 

..  <" 

9 

=^s 

r- 

--f* 

<j 

- 

Ifel 

— 

tF-fc 

I — I— H — h|9-44-<* — I — l- 


- 

i 

J 

^  ~ 

o 

^ 

> 

^ 

\n 

J 

-4- 

1111 — 1 — HH — 1 — 1- 

W 

EEi: 

- 

1 

«^ 

5*> 



i ■-- 

o 

: 

* 

- 

•s 

i- 

u 

' " 

*/) 

1 — 

1 — 1 

l — 1 

1 — 1 

1 1 

1 

1 1 

i — i 

(NO 

$ 

^4 

-- — S»-L 

r~-  - 

1 

cl, 

O 

:T--- 

^N 

! 

i 

- 

- 1 

I 

-1 

.  __ ._  -  ^ 

H 

CO  +J 
rd  lM 
£  o 
cu  r- 
II 
h  ca 
O 

•H  O 

x;  o 

10  ^ 

+ 
Cn  ll 
C  a 

•H 

n3 
rci 
O 


CD 

o 


>i 

rH 
rH 

tti 

•H 
+J 
•H 
C 
•H 


S 


CD 
CO 

O  tn 
ft  + 

CO    II 
Q>    £ 


td 

CD 

c 

•H 


CD 
C7^ 

•rH 

Cm 


H 1 h 


H — I — h 


146 


1      1      1     +-H 1— 1— 1 

0 

..    _ 

1 

- 

■ 

: 

r 

"L 



— 

0 

~ 

1 

o 

fife; 

00 

ll\ 

s- 

7 

>v 

% 

<s 

' 

■> — < 

J 

o 

J-" 

„ 

\". 

1 

% 

1 

1_| — j_ ] |~ \ 1 

V       — 

.$ 

_„_ 

o 

1 

•bl 

#! 

* 

?$s 

0  " 

2j— 

- 

: 

1 

,i 

o 

| 

£ 

: 

'"+• 

t 

L-l 

+-§— fcw- 


H — I 


- 

vn 

i 

- 

- 



0 

t 

-— 

V 

r 

^ 

uV 

^ 

^ 

w 

+ 

f—H \ — 1 1 1 1 

D 

-v 

O 

CIV 

I 

~> 

u 

g 

r 

l  . 

o 

I 

+■ 

H 

<D  — 
10   4-> 

rd  u-i 

x:  o 

CM  r- 
II 
U  ca 
O 

in     •> 
+J 

x:  cm 

+ 

rji  II 

•H 

fO  tH 

0)   rH 

fH    fd 

•H 

4-> 

■H 

G 

•H 


>i 


(1) 

x: 

-p 

m 
O 


Pm 


CD 
w 

O    L^l 

W    II 

(D    C 


H 
0) 

c 

■H 
•J 


0) 

n 

■H 

P4 


147 


During  the  same  cycle  of  computation  the  digital  computer 
inverts  the  sign  of  longitudinal  distance,  a,  and  for  the 
same  lateral  distance,  3/  gives  another  pair  of  Y— force 
and  N— moment  to  the  analog  computer,  which  are  the  inter- 
action effects  applied  to  the  tracking  ship. 

a.  Stationary  Runs  (i.e.  both  ships  have  same 
propeller  speed) 

Figures  65  to  75  show  the  linear  response  of 
both  the  leading  ship  and  the  tracking  ship  alongside  at 
the  same  speed  of  15  knots  at  various  longitudinal  and 
lateral  distances  respectively.   The  responses  were  calcu- 
lated in  terms  of  the  perturbated  parameters  ijj  ,  Y  ,  N  ,  y  , 

a,  3/  y   (  i,1'   where  the  indices  A  and  B  mean  the  leading 

°B    B 
ship  (ship  A)  and  tracking  ship  (ship  B)  respectively. 

Depending  upon  the  relative  position  of  the  ships  there 

are  cases  of  attraction  between  them  and  repulsion  between 

them.   An  interesting  case  was  observed  at  the  exactly 

abeam  position,  while  the  two  ships  were  alongside  at  70 

ft  lateral  separation  distance.   The  lateral  distance  was 

kept  constant  at  70  ft  throughout  the  time  of  recording 

although  both  ships  were  yawing  at  negative  angles. 

b.  Runs  with  Different  Propeller  Speed  between 
Ship  A  (Leading  Ship)  and  Ship  B  (Tracking  Ship! 

The  assumption  made  for  Phase  I  that  both  ships 

can  possess  any  desired  initial  positions  with  respect  to 

the  (x  ,y  )  axes  is  carried  throughout  phase  II,  since 
o   o 

again  the  tracking  ship  was  never  able  to  completely  over- 
take the  leading  ship  during  the  prog>'     of  a  single  run. 
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The  obtained  responses  were  calculated  in  terms  of  the 

perturbated  parameters  ip_  ,  Y„ ,  N„  .  y  ,    a,    8,  y   ,  ^^ 

A  B 

where  the  indices  A  and  B  mean  ship  A  and  ship  B  respec- 
tively.  With  no  controls  applied  on  both,  ships     the 
tracking  ship  was  chosen  to  have  in  the  first  case  10  RPM 
propeller  speed  and  in  the  second  case  5  RPM  propeller 
speed  greater  than  the  speed  of  15  knots,  which  was  the 
leading  ship's  speed. 

In  Figure  76  the  initial  position  of  the  track- 
ing ship  is  at  (—524  ft,  70  ft)  and  that  of  the  leading 
ship  at  (0,0).   Obviously  the  longitudinal  distance  de- 
creases since  the  tracking  ship  has  a  greater  speed.   The 

lateral  distance,  decreases  also  since  the  y    velocity  of 

A 
the  leading  ship  is  positive  and  greater  than  the  y    veloc- 
ity of  the  tracking  ship,  which  is  also  positive.   This 
means  that  the  leading  ship  is  pulled  towards  the  tracking 
ship.   It  is  seen  also  that  the  leading  ship  yaws  to  posi- 
tive angles  as  well  as  the  tracking  ship  but  since  the 
leading  ship's  yaw  angles  are  greater  than  those  of  the 
tracking  ship  the  stern  of  the  leading  ship  comes  towards 
the  bow  of  the  tracking  ship. 

Next  in  Figure  77  initially  the  longitudinal 
distance,  a,  and  the  lateral  distance,  3/  were  —400  ft  and 
70  ft  respectively.   The  lateral  distance,  3/  was  decreas- 
ing until  the  longitudinal  distance  became  roughly  —250  ft. 
At  this  point  both  the  interaction  force  and  moment  on  the 
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leading  ship  changed  sign.   This  can  be  observed  in  Figure 
78  where  initially  a  and  B  were  —300  ft  and  50  ft  respec- 
tively.  The  above  mentioned  change  of  sign  results  in  a 
negative  leading  ship's  yaw  angle,  while  the  tracking  ship 
continues  to  have  positive  yaw  angle.   The  lateral  distance 
starts  to  increase  from  the  instant  at  which  the  longitudi- 
nal distance  is  roughly  —250  ft. 

In  Figure  79  a  and  3  were  initially  —200  ft 
and  50  ft  respectively.   It  can  be  seen  that  the  leading 
ship  yaws  to  negative  yaw  angles  while  the  tracking  ship 
maintains  zero  yaw  angle.   Although  this  is  happening  the 

y    velocity  is  negative  and  the  y    almost  zero.   Hence 

°A  °B 

the  leading  ship  i s  pushed  away  from  the  tracking  ship  and 

the  lateral  distance  is  increased. 

The  same  analysis  can  be  done  for  the  response 
of  Figure  80a  where  a  and  B  were  initially  —160  ft  and  70 
ft  respectively  as  well  as  for  the  response  of  Figure  80b 
where  initially  was  set  a  =  —160  ft  and  B  =  50  ft. 

Figure  81  shows  the  response  obtained  for  the 
exactly  abeam  position  of  the  two  ships  being  alongside. 
It  is  seen  although  both  ships  are  yawing  excessively  to 
negative  angles  the  lateral  distance  is  slightly  increas- 
ing.  Hence  this  is  the  best  position  for  station  keeping. 

Figure  82  shows  the  obtained  response  for  a 
and  3  being  initially  +160  ft  and  100  ft  respectively. 
It  is  seen  that  the  lateral  distance  B  starts  to  decrease 
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when  the  longitudinal  distance  becomes  roughly  +200  ft, 

while  the  leading  ship  yaws  slightly  negatively  and  the 

tracking  ship  yaws  excessively  negatively.   These  facts 

bring  the  bow  of  the  leading  ship  towards  the  tracking 

ship's  stern.   At  +250  ft  longitudinal  separation  between 

midships  the  leading  ship  reverses  direction  of  yawing 

while  the  tracking  ship  continues  to  yaw  negatively. 

This  can  be  seen  more  easily  in  the  response 

of  Figure  83  where  initially  a  and  3  set  at  +200  ft  and 

100  ft  respectively.   Due  to  these  opposite  yaw  angle 

directions  the  sterns  of  both  ships  are  pulled  toward  each 

other  while  the  lateral  distance  is  decreasing.   In  Figure 

84  a  and  3  initially  were  set  to  be  equal  +300  ft  and  70 

ft  respectively.   The  lateral  distance  is  decreasing  due 

to  the  fact  that  the  leading  ship's  y    velocity  is  posi— 

°A 
tive  and  greater  than  that  of  the  tracking  ship.   Also 

the  leading  ship  yaws  positively  while  the  tracking  ship 
yaws  slightly  negatively.   This  brings  leading  ship's 
stern  towards  the  tracking  ship.   Note  that  at  roughly 
+350  ft  longitudinal  separation  the  tracking  ship  reverses 
the  direction  of  yawing.   This  tends  to  bring  the  bow  of 
the  tracking  ship  towards  the  stern  of  the  leading  ship. 

Figures  85  and  86  show  the  responses  for 
initially  setting  ex  and  3  +400  ft  and  +524  ft,  70  ft  res- 
pectively.  The  lateral  distance,  3,  is  increasing  although 
both  ships  yaw  positively. 
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Figures  87  to  97  show  the  responses  obtained 
for  different  initial  positions  of  the  ships.   The  analy- 
sis of  these  curves  is  analogous  to  the  previous  one, 
the  difference  being  that  the  tracking  ship  has  now  a  +5 
RPM  greater  propeller  speed  than  that  of  15  knots.   Note 
that  for  the  smaller  difference  in  propeller  speed  there 
is  a  smaller  rate  of  change  of  the  lateral  separation 
distance  although  both  ships  yaw  to  greater  -  values  of  yaw 
angles  since  they  have  adequate  time  for  that. 

c.   Manual  Control  is  Applied  in  Phase  II 

From  the  previous  obtained  responses  it  is 
obvious  that  control  must  be  applied  in  order  to  keep  a 
desired  course  as  well  as  a  lateral  separation  distance, 
3.   Up  till  now  for  lateral  distance  greater  than  100  feet 
or  less  than  50  feet  the  digital  programming  was  made  such 
that  for  these  cases  a  zero  force—Y  and  moment— N  was  given 
to  the  analog  computer.   This  fact  made  impossible  for  the 
tracking  ship  to  completely  overtake  the  leading  ship  dur- 
ing only  one  run.'   At  this  point  the  following  approxima- 
tion was  made  to  override  this  difficulty,  namely  the 
digital  programming,  Computer  Program  VII,  was  made  such 
that  the  digital  computer  gives  (for  values  of  3  outside 
the  table  limits)  the  values  of  Y— force  and  N— moment  cor- 
responding to  the  extreme  values  of  3/  i.e.  50  ft  and  100 
ft.   Obviously  in  the  actual  case  the  interaction  effects 
would  be  more  pronounced  for  3  less  than  50  ft  and  less 
pronounced  for  3  greater  than  100  ft.   But  with  this 
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approximation  it  was  possible  to  get  the  response  of  Fig- 
ure 98  with  control  manually  applied  in  terms  of  the  per— 

turbated  parameters  ib.,    AR.V  ,  N^  ,  y   ,  a,  8.  AR^,  ill   where 
L  rA     A    A    o  B    B 

A  and  B  indices  mean  ship  A  and  ship  B  respectively.   The 
tracking  ship  originally  placed  at  x   =  —200  ft,  y  =  50  ft 
has  a  10  RPM  greater  propeller  speed  than  the  leading  ship. 

These  responses  do  not  give  the  actual  needed 
rudder  to  maintain  station  and  course  unless  the  operator 
is  practiced  enough  to  know  the  behavior  of  both  ships  and 
hence  is  familiar  with  the  amount  of  rudder  actually  needed 
Nevertheless,  these  responses  support  the  already  known 
fact  (from  experience  at  sea)  that  underway  replenishment 
is  a  controllable  operation  although  experienced  helmsmen 
are  needed  on  both  ships  of  the  UNREP. 

E.   CONCLUSIONS  -  REMARKS  -  SUMMARY 

Before  any  conclusion  is  derived  it  must  be  mentioned 
here  that  this  study  was  done  for  the  underway  replenish- 
ment at  sea  of  two  equal  sized  merchant  ships,  namely 
MARINER  class  ships.   The  study  also  assumes  calm  water 
conditions  which  consequently  assumes  motion  of  ships  in 
3— degrees  of  freedom  only.   The  hybrid  simulation  was  done 
primarily  for  the  no  control  plant  although  some  remarks 
can  be  deduced  for  the  nature  of  rudder  (control  surface) 
needed.   Most  of  the  observed  results  of  this  simulation 
study  are  already  known  from  experience  of  real  replenish- 
ment at  sea  operations.   But  this  agreement  assures  that 
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this  simulation  was  done  correctly  and  gives  the  neces- 
sary background  for  the  investigation  and  solution  of 
the  control  problem. 

During  the  approach  and  departure  of  the  tracking 
ship  there  is  a  risk  of  collision  since  at  these  posi- 
tions the  lateral  separation  distance  is  decreased  due 
to  the  interaction  effects  created  from  the  pressure  dis- 
tribution fields  of  the  hulls  of  both  ships. 

To  be  more  specific,  with  the  leading  ship  placed  at 
(0,0)  and  having  a  15  knots  speed,  i.e.  the  same  speed 
with  that  of  the  space  coordinate  system,  also  with  the 
tracking  ship  placed  at  (—524  ft,  3)  and  having  a  An 
RPM  greater  propeller  speed  than  that  of  the  15  knots 
ship  the  following  can  be  deduced. 

a.  During  the  approach  the  stern  of  the  leading 
ship  and  the  bow  of  the  tracking  ship  tend 
to  attract,  while  the  lateral  distance  is 
decreased  until  the  longitudinal  separation 
distance  is  roughly  —250  ft.   Also  both  ships 
yaw  in  the  same  direction,  but  at  different 
rates  and  values  depending  on  their  speed 
difference. 

b.  For  a  decrease  in  longitudinal  separation 
from  —250  ft  to  zero  ft  the  lateral  separa- 
tion increases  although  the  ships  yaw  to 
different  directions  and  values. 

c.  At  zero  longitudinal  distance,  i.e.  exactly 
abeam  position  and  50  ft  lateral  distance 
both  ships  yaw  negatively  by  the  same  amount 
while  the  lateral  separation  distance  slightly 
increases  throughout  the  time  of  recording. 

d.  With  both  ships  having  the  same  speed  of  15 
knots  and  being  exactly  abeam  there  is  little 
change  of  the  lateral  distance  throughout 
the  time  of  recording  although  both  yaw 
negatively . 
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e.  During  the  departure  from  the  exactly  abeam 
position  to  until  the  longitudinal  distance 
of  roughly  +3  50  ft. 

(1)  A  decrease  of  the  lateral  distance  takes 
place. 

(2)  Initially  the  bow  of  the  leading  ship 
tends  to  be  attracted  to  the  stern  of 
the  tracking  ship,  while  both  ships  yaw 
negatively  at  different  angles. 

(3)  At  roughly  +250  ft  longitudinal  separa- 
tion distance  the  leading  ship  changes 
direction  of  yawing  while  the  tracking 
ship  maintains  negative  yawing.   This 
tends  to  bring  the  stern  of  the  tracking 
ship  towards  the  leading  ship. 

f.  For  longitudinal  separation  distances  greater 
than  roughly  3  50  ft,  the  lateral  distance 
increases  while  both  ships  yaw  positively 

at  different  angles  and  rates. 

One  basic  assumption  was  carried  out  throughout  the 
UNREP  simulation.   That  is  both  ships  could  be  initially 
placed  at  any  desired  position. 

From  the  above  discussion  it  is  seen  that  the  best 
position  for  station  keeping  and  collision  avoiding  for 
two  ships  of  the  same  size  is  while  keeping  the  same  speed 
exactly  abeam,  although  a  certain  amount  of  rudder  has  to 
be  applied  on  both  ships  for  course  keeping.   This  is  in 
agreement  with  reference  [1]  .   It  is  obvious  that  du3:ing 
the  departure  and  approach  the  rudder  to  be  applied  must 
counteract  both  the  interaction  moment  as  well  as  create 
a  yaw  angle  sufficient  to  counteract  both  the  attraction 
force  and  the  rudder  force.   By  these  means  collision 
should  be  avoided  provided  that  there  is  enough  initial 
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lateral  separation  distance  so  the  time  elapsed  between 
the  instant  action  is  applied  by  the  operator  (helmsman) 
and  rudder  action  takes  place  is  adequate.   It  can  be 
seen  also  that  during  the  approach  and  departure  both 
ships  yaw  from  positive  to  negative  angles  and  vice  versa. 
This  implies  that  in  a  short  period  of  time  the  operator 
has  to  apply  negative  to  positive  rudder  angle  provided 
that  the  operator  has  been  trained  enough  so  that  he  knows 
the  exact  time  at  which  rudder  has  to  be  applied.   Ob- 
viously this  is  not  easy. 

This  study  probably  would  be  more  effective  using  the 
interactive  graphics  available  on  modern  computer  systems. 

A  matter  of  future  investigation  should  be  the  imple- 
mentation of  automatic  controls  in  the  hybrid  simulation 
as  well  as  the  inclusion  of  sea  states. 
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VII.   INVESTIGATION  OF  THE  CONTROL  PROBLEM 

The  leading  ship  usually  is  responsible  for  course 
keeping  and  the  tracking  ship  is  responsible  for  both 
course  and  station  keeping.   These  requirements  imply  two 
different  controls  for  the  course  and  the  station  or  dis- 
tance keeping. 
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Figure  99.   Course  keeping  loop 


A.   COURSE  KEEPING  LOOP 

Figure  99  shows  the  control  loop  for  course  keeping. 
The  steering  control  block  G   can  be  represented  as  a 
first  order  lag  function.   In  the  section  B2  the  time  lag 
was  estimated  to  be  of  the  order  of  8  sec.   Hence  the 
transfer  function  should  be  as  follows: 

K. 


<P 


S  +  i 


where  K  is  the  steering  control  aain 
6 
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The  course  keeping  loop  may  not  contain  the  yaw  angle 

reference,  \p      f,  since  during  the  UNREP  operation  course 

changing  is  not  desired  but  course  keeping.   Hence  for 

the  beginning  at  least  of  the  simulation  with  automatic 

control  included  the  reference  yaw  angle  ip   f  should  be 

set  equal  to  zero.   The  ships  dynamics  block  contains  the 

transfer  function  G   =  —  which  can  be  found  by  Laplace 

transforming  equations  (V— 1)  and  solving  for  the  above 

mentioned  ratio.   It  should  be  noted  here  that  both  the 

transfer  function  G,  and  G„  have  been  built  for  the  analog 

4>  2 

simulation  of  Phase  I  and  II.  Obviously  in  question  must 
be  the  order  of  magnitude  of  the  feedback  gains  K  and  K. 
The  values  of  K  and  K  can  be  designed  by  normal  feedback 
control  techniques. 

B.   DISTANCE  OR  STATION  KEEPING  LOOP 

Figure  100  shows  the  distance  keeping  loop  where  3   f 
is  the  ordered  lateral  separation  distance  and  $  the  actual 
lateral  distance  between  the  two  ships.   Note  that  this 
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Figure  100.   Distance  keeping  loop 
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control  loop  contains  the  ships  dynamics  G„  including 
hybrid  simulation  for  obtaining  the  lateral  distance. 
In  question  must  be  whether  the  feedback  function 
should  contain  the  rate  of  change  as  well  as  the  change 
of  the  lateral  distance.   The  steering  control  transfer 
function  is  again: 

G.  =      6 


S  +i 


Note  that  for  the  distance  keeping  loop  the  ships 
dynamics  transfer  function  G„  involves  hybrid  simulation 
since  transformation  of  coordinates  is  implied  for  the 
quantities  being  measured  with  respect  to  the  space  co- 
ordinates system. 
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COMPUTER  PROGRAM  I  A 


*     STATIC  TEST  FOR  SHIP  NO  1 

-.JOB  GAL1225 

-.FORTRAN  LS,GO 

C   SECTION  CHECKING  POT  AND  AMP  VALUES 


FCR 
30)  t  AMP  AD ( 


IOC 

10 

LOL 

102 

12 

103 

20 

200 

-iLOAC 

-.DATA 

POOO 

POOl 

P002 

POO  3 

POO  4 

POO  5 

P006 

POO? 

P010 

P011 

P012 

P013 

P  0 1 4 

P015 

P016 

PC17 

PG20 

P021 

P022 

P053 

P054 

P055 

P0500 

P0  3  1 

P056 

P057 

A00  1 

A003 

A005 

A013 

A017 

D00  1 

D003 

D005 

0013 

D017 

A006 

A  01  6 

A002 

A010 

A014 


D  I  MENS  I  ON  POTAUC30)  , POTVAL( 

INTEGER  POTADt AMP/ I 

DATA  N/26/ 

READC5,  10  0)  (POT  AD  (  I  )  ,POTVAL(  I ) , I=1,N) 

FORMAT( A4,F10.4) 

DO  10  1  =  1, N 

CALL  SETPOTtPOTAD(I) , POTVALC I ) ) 

WRITE (6, 101)  (POTAO( I )  , POTVALC I )  ,  I=1,N) 

FORMAT! A4,F10.4) 

READ(5,102)  (AMPAD(I)  ,  1  =  1,28) 

FORMAT (A4) 

CALL  RESET(IOOO) 

DC  12  1-1,28 

CALL  SCAN( AMPADC I ) , AMPVAL( I ) ) 

WRITE (6, 103)  ( AM  PAD ( I ) , AMPVALt I )  ,1  =  1,28) 

FORMAT( A4,F10.6) 

DO  20  I=1,N 

CALL  SCAN( POTAD( I )  , POTVALC I  )  ) 

WRITE (6, 2 00)  (POTADt I)  , POTVALC  I)  ,I=i,N) 

FOPMATC A4, F10.6) 

END 

XR,MAP 


SHIP  #1 

30) , ANPVAL130) 


]  000 


0803 
060  0 
04 
0.0052 
0.1660 
0900 
2379 
2383 
4717 
0250 
1200 
5607 
1340 
1500 
C920 
0097 
.3  576 
0.0905 
0.0500 
.  1497 
0337 
0.3000 
0.0092 
0.4  540 


0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
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A022 
A203 
A  112 
A20L 
A050 
A056 
A052 
A060 
A212 
A05L 
A057 
D051 
D057 
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COMPUTER  PROGRAM  IB 

*     STATIC  TEST  FOR  SHIP  NO  2 

-.JOB  GAL  1225 

-.FORTRAN  LS.GO 

C   SECTION  CHECKING  POT  AND  AMP  VALUES  FCR  SHIP  #2 

DIMENSION  POT  AD (30) , POTVAL(30) , AMP AD (30)  t  AMPVALC 30) 

INTEGER  POTADtAMPAD 

DATA  N/22/ 

RE AD (5, 10  0)  ( POT  AD (  I  ) ,POTVAL( I )  ,  1  =  1, N) 

100  FORMAT( A4,F10.4) 
DC  10  I  =  1,N 

10  CALL  SETPOT(POTAD(  I ) ,POTVALt  I  )  ) 

WRITE*  6, 101)  CPOTADC I )  , POTVALC I  )  , I=1,N) 

101  FCRMAT( A4,F10.4) 
READ(5,L02)  (AMPADC I ),  1  =  1,27)  • 

102  FORMAT (A4) 

CALL    RESET(IOOO) 
DO    12    1=1,27 
12    CALL    SCANt AMPADl I ) , AMPVALC I ) ) 

WRITE (6, 103)     (AMP ADC  I  )  , AMPVALC I )  ,1  =  1,27) 

103  FORMAT( A4,F10.6) 
DO    20     1=1, N 

20    CALL    SCAN( POTAD( I  )  ,POTVAL(  I  )  ) 

WRITE (6, 2 00) (POTADCI )  ,POTVAL( I )  ,  I  =  1,N) 
200    FORMAT (A4,F  10.6) 
END 


-.LOAC 

XF 

i,MAP 

-.DATA 

P024 

0. 

.1000 

P025 

0. 

0300 

P02  6 

0, 

,0803 

P027 

C. 

,0600 

PO^O 

0, 

,0404 

P0A5 

0, 

,C920 

P031 

0. 

,0052 

P023 

0, 

,0905 

P034 

0. 

,1660 

P033 

0, 

,0900 

P046 

0. 

,4717 

P032 

0. 

,2379 

P035 

0. 

,2383 

P047 

0  , 

,1497 

P036 

0, 

,009  7 

P037 

0. 

,0250 

P040 

0, 

,  1200 

P041 

0, 

,  1340 

P042 

c, 

,  1500 

P043 

0, 

,560  1 

P044 

0, 

,3576 

P052 

0, 

,5000 

A035 

D035 

A027 

D027 

A033 

D033 

A04  1 

D04  1 

A043 

C043 

A034 

A  03  6 

A026 

A044 

A  03  0 

A04  2 

A104 

A065 

D065 


201 


A061 
D061 
A072 
A076 
A066 
A204 
A21  1 
A  2  1  •<. 


202 


* 

-.JOB 

-.FOR 


C  ST 

id 
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LIN 

AND 

GAL 

TRAN 

I  ' 

RF 

DI 

CRAG 

DO 


1 
20 


20 
1 


30C 


30 
1 
C  IN 
C  RF 
C  AL 
C  AL 

40 

AC 

40 
C  RE 


RE 

FO 
DO 
RE 
WR 
FO 
DO 
WR 
FO 
CC 
WR 
FC 
DO 
WR 
i  FO 
3  CO 
TERP 
MEME 
PBAR 
SO  B 
RE 

0  FC 
WR 

1  FO 
W  R 

2  FO 
SCAL 

AL 


402 


404 


WR 
FC 
WR 
BE 
BE 
\." 
Ir 
WR 
IF 
IF 
IF 
IF 
GO 
NB 
YB 
GC 
ARCH 
ND  C 
C  IB 
IB 
BE 
WT 
IF 
IF 
C  ALPHA 
IA 
WT 
GC 
PHA 

|    1  r 

AL 


801 


C  SE 
C  FI 

80 


C  AL 


EAR  I 
Y-FO 
1225 

LS,G 
AL  NM 
AL  NB 
MENS  I 
OF  N 
10  J 
AD(5, 
RMAT( 

12  J 
AD(5, 
ITE(6 
PMAT( 

1LJ  = 
ITF  ( 
RMAT( 
NTINU 
ITE(6 
PMAT( 

13  J 
ITE(6 
RMAT( 
NTINU 
OLATI 
ER  BE 
=  1.0 
FTBAR 
AD(  5, 
RMAT( 
ITE<6 
RMATC 
ITE(6 
RMAT( 
ING  0 
PHA=5 
1TE(6 
V'MAT( 
ITE(6 
TBA  =  A 
TA=10 
ITE(6 
RMAT( 
ITE(6 
(BETA 
{BETA 
(  ALPH 
(ALPH 

TO  8 
AR  =  0. 

AR=Or 

TO  8 
FOR 
ORRFS 
1=BET 
=  IB1- 
TA  1=1 
E  =  (BE 
(ALPH 
(ALPH 
=  0 
=  13 
A=0.0 
TO  3 
LESS 
l=-AL 
PHA1  = 


NTERPOLATION 
RCE 


IN  2-DI MENS  IONS  ARRAY  CF  N-MOMENT 


0 

AXrND 
ARt  N, 
ON  Y( 
ON  DIM 
=  1*25 
1 0  0  J 
6ELL. 
=  1  ,25 
100) 
,200) 

•  i  fi 

1,25 
6,201 
'  '  t1 

E 

,300) 
i  i  i 

=  1,25 

,301) 

'  '  tl 

E 

ON  I N 

TBAR  = 

CORRE 

AND 
400)  A 
2  f  1  1 . 
,401) 
e  •  ,1 
,402) 
«  «  ,1 
F  ALP 
50 .  0* 
,403) 

•  •  ,1 
,501) 
BS(  BE 
0.0  *B 
,404) 
«  •  ,1 
,501) 
.LT.5 
.GT  .1. 
A.LT. 
A  .  G  T  . 
00 

0 

c 

02 

INDET 

PONDE 

A/10. 

4 

BL*10 

TA-BF 

A.I  T  . 

A.GT. 


I MTNSCAL 

NBAR1 

30,30)  ,N(30,30) 

ENSIONAL  ARRAY  FOR  N  AND  Y 

( Y( J, I  J  ,1=1,6) 

4» 

(  N  (  J  ,  I  )  ,  I  =  1  ,  6  ) 

THIS  I  S  Y  (  J  ,  I  )  f  ,  / / ) 

)  (Y( J, I ),I=1,6) 
0X,6(E11.4,2X»,//) 

THIS  IS  N( J, I  )',//) 


(N( 
OX, 6 

2-0 
1  .0 
SPON 
ALPB 
LPBA 
6) 

f\V         ( 

\J  /\  , 

ALP 
OX, 2 

HABA 
ALPB 

OX,  • 
ALPH 
TBAR 
ETBA 


J,  I  )  ,1  =  1,6) 
(E11.4,2X)  ,//) 

IM.  ARRAY. PASS  BETBAR  AND  ALPBAR 
CORRESPONDS  BETA=100.0  FEET*** 
DS  ALPHA=550.0  FEET 
AR  ARE  PAST  IN  COMPUTER  UMTS 
R, BETBAR 


THIS  IS  ALPBAR-BETBAR* ,//) 

BAR, BETBAR 

F11.6) 

R=ALPBAR  AND  BE T ABAR=BE T B AR 
AR 

THIS  IS  ALPHA' , //) 
A 

) 


OX, 'THIS  I S  BETA' ,//) 

BETA 

0.0) 

00.0 

-550 

550 


GO  TO  803 
)  GO  TO  801 
.0)  GO  TO  801 
0)  GO  TO  801 


IFICATICN  OF  ARRAY  ELEMENT 

D  Y  AND  N  -LINEAR  INTERPOLATION  IN  2-DIMEN 

0 


TAD  /10.0 
OcO)     GO    TO    1 
0.0)     GO    TO    2 


THAN    ZERO 
).0 
L*50 


203 


C  ALPH 
2 


101 
102 
202 
203 


602 

603 

604 

605 

606 

607 

50C 
501 

60G 
609 
61C 
611 

612 


WTA=-(  A 
IA=13-I 
GC  TO  3 
A  GREAT 
IA1=ALP 
IA=13+I 
ALPHA  1  = 
WTA=( AL 
IB2=IB-» 
I F  (  I  [\.  E 
IA2=IA+ 
I  F  (  I A  .  F 
WRITE(6 
FCRMAT( 
WRITF(6 
FORMAT ( 
WRITE (6 
FORMAT( 
WRITE(6 
FORMAT { 
IF (ALPH 
I  F  (  I A  .  E 
IF(WTA. 
I  F  (  WT  B  . 
NGAR1=N 
WRITEC6 
FORMAK 
WRTTE( 6 
R=N( 
WRITF(6 
FORMAT ( 
WRITE(6 
BARN1=( 
WRITE (6 
FORMAT  ( 
W  R  I T  E  (  6 
NBAR1=N 
W  R  I T  E  (  6 
FORMAT ( 
WRITE(6 
NBAR=N( 
WRITE( 6 
FORMAT ( 
W  R  I T  E  (  6 
BARN2={ 
WRITE (6 
FORMAT ( 
WRITE{ 6 
NBAR=( 6 
W  R  I T  E  (  6 
FORM  i ( 
WRITE(6 
FORMAT ( 
YBARi-Y 
WRITE(6 
FORMAT ( 
W  R  I  T  E  (  6 
YBAR=Y( 
WRITE (6 
FORMAT i 
WRITE( 6 
BARY1=( 
WRITE (6 
FORMAT ( 
WRITE (6 
YBAR1=Y 
WRITE(6 
FORMAT { 
WRITE(6 
YBAR=Y( 


LPHA-ALPHA1 )/50,0 
Al 

ER  THAN  ZERO 

HA/50.0 

Al 

IA1*50 

PHA-ALPHA1 J/50.0 

1 

Q.6)  IB2=6 

1 

G.25)  IA2=25 

,101)  IB  L ,  IB,  IB2, IA1 

8  ,,10X,'IB1=',I3,5X,'IB=',I3,5X,'IE2=',I3,5X,' 

,102)  IA,IA2 

'  I,10X,'IA=',I3,5X,,IA2=',I3,//) 

,202)  BETA1,WTBTALPHA1 

1  •  , 'BETA1'  , E14.8,2X,  «WTB'  ,EL4, 8,2X,  'ALPHA  I « ,E1 

,203)  WTA 

•  ' T«WTA=' ,E14.8,//) 

A.LT.O.O)  IA2=IA-l 

G.l)  IA2  =  1 

EQ.O.O) I A2=IA 

EQ.O.O)  IB2=IB 

(IA»IB2) 

602) 
' ,'THIS  IS  NBAR1' ,//) 

502)  NBAR1,IA,1B2 

A,  IB) 

603) 
• ,«THIS  IS  MBAR' ,//) 

502)     NBAR, IA, IB 
NBAR1-NBAR)*WTB+NBAR 

604) 
' , 'THIS  IS  BARN1' ,//) 

501)  BARN1 

T  A  1    T  n  o  V 
I  t\c.f  I  DC.  I 

605) 
' ,'THIS  IS  NBAR1' ,//) 

502)  NBARl,IA2,IB2 
A2,IB) 

606) 

1 , 'THIS     IS    NBAR« ,//) 
502)     NBAR,  IA2,  IB 
NBAR1-NBAR)*WTB+NBAR 
607) 

' ,'THIS     IS    BARN2' ,//) 
501)     BARN2 
APN2-BARNI ) *WTA+BARN1 
500) 

' , 'THIS  IS  FINAL  NBAR' ,//) 

501)  NBAR 

8 ,10X,E14.8,//) 
I  A, IB2) 
608) 

1  ,'THIS  IS  YBARL'  ,//) 

502)  YBAR1,IA,IB2 
A,  IB) 

60S) 

','THIS  IS  YBAR',//) 
502)  YBAR, IA, IB 
YBAR 1-YbAR) *WT6+YBAR 
610) 

1  ,'THIS  IS  BARY1'  ,//) 
60UBARY1 
IA2.IB2) 
611) 

« , 'THIS  IS  YBAR1' ,//) 
502)  YBAR1  ,IA2,IB2 
A2,IB) 
612) 

8  ,'THIS  IS  YBAR'  ,//) 
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612 


600 

601 
5C2 
C  RE  ME 

802 


802 


2000 

■  LOAD 

■  DATA 


WRITE( 
BARY2= 
WRITE( 
FORMAT 

W  R  I  T  E  ( 

YBAR==( 

WRITE ( 

FORMAT 

Vs'RITE( 

FORMAT 

FORMAT 

MPER  S 

CIVIDE 

GO  TO 

NEAR=4 

WPITE( 

WRITE* 

YEAR=9 

WRITE ( 

WRITE ( 

GO  TO 

WRITE( 

WRITEC 

WPITEC 

WRITE! 

END 

XRtMAP 


6,50 
(YBA 
6,61 
(  '  ■ 

6  ,60 
3ARY 
6,60 
(  •  ' 
6,60 
{  •  ' 
(  <  ' 
I  MUL 

BY 
2000 
4.5E 
6,50 
6,50 
O.OE 
6  ,60 
6,60 
2000 
6,50 
6,50 
6,60 
6,60 


2)  YB 

RI-YB 

3) 

,  'THI 

L)  BA 

2-BAR 

0) 

,«THI 

1)  YB 

♦  10X, 

,10X, 

AT  I  ON 

100.0 


AR, IA2, IB 
AR)*WTB+YBAR 

S  IS  BARY2' ,//) 

RY2 

Yl )*WTA+BARYl 


S  IS 
AR 
E14. 
E 1 4 . 
IS 


FINAL  YBAR'  ,//  ) 

8,//) 

3,5X,'R0W='  ,  1 .3,  IX,  «COL='  ,  13) 

DONE  IN  COMPUTER  UNITS  SO  NO 


NEED  T 


SINCE  SUBR.  CAC  CONVERTS  BY  ITSELF  IN 


-05 

0) 

1)  NBAR 

~05 

0) 

I)  YBAR 


0) 
1) 
05 
1) 


NBAR 
YBAR 


-0.  1 

-0.2 

-0.3 

-0.3 

-0.4 

-0.2 

-0.2 

-0.1 

0.4 

0.2 

0.5 

0.7 

0.8 

C.9 

0.8 

0.  6 

0.4 

0.3 

0.  1 

0.6 

-0.2 

-0.5 

-0.6 

-0.5 

-C.  1 
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400E- 

400E- 
2C0E- 
8C0E- 
OOOE- 
500F- 
t  0  0 1  - 
30  0E- 
OOOE- 
700E- 
CGCT-- 
COOE- 
500E- 
COOE- 
200E- 
250E- 
500F- 
OOOE- 
700E- 
OOOE- 
OOOE- 
COOE- 
COOF- 
COOE- 
COOE- 


■03^-0 
03-0 

03  -  0 
03-0 
03-0 
C3-0 
03-0 
C3-C 

04  0 
03  0 
03  0 
03  0 
03  0 
03    0 

■03    0 

03    C 

03    0 

03    0 

03    0 

•04    0 

04-0 

■04-0 

04-0 

■04-0 

•04-0 


.L263E- 
.2112E- 
.2762E- 
.322:5^- 
.3337E- 
.2870E- 
.2079E- 
.93  84E- 
.5507E- 

•  25  08E- 
.4507E- 
.6225E- 
.7500E- 
.7844F- 
.71  : 
.5579E- 
.4089E- 
.2781E- 

•  1673E- 
.6822E- 
.3562E- 
.3493E- 
.4904E- 

•  4699E- 
.2096E- 


03-0 
03-0 
03-0 
03-0 
■03-0 
03-0 
03-0 
•04-0 

04  0 
03  0 
03  0 
03  0 
03    0 

■03  0 
03  0 
03  0 
03  0 
03  0 
03  0 
•04    0 

05  0 
04-0 

•04-0 
•04-0 
■04-0 


«  LI60E-03 
.1897E-03 
.2433E-03 
.2793F-03 
.2840E-03 
.23  97E-03 
.  L689E-03 
.6671E-04 
.6637E-04 
.2364E-03 
.4137E-03 
.5643E-03 
.6750E-03 
.6977E-03 
.6378E-03 
.5075E-03 
.3781E-03 
.2616E-03 
.1652E-03 
.7438E-04 
.8767E-05 
.2363E-04 
.4082E-04 
.4473E-04 
.2918E-04 


-0. 1058E-03- 
i81E-03- 


■0.16 
■0.21 
•0.23 
■0.23 
■0.  L9 


Ml 

•0 
0. 
0 

v. 
0 


12 
39 
7  7 
22 
37 
50 


0.60 

0.61 

0.5  5 

0.45 

0.34 

0.2  4 

0.  16 

0.80 

0.21 

•0.12 

<0.32 

-0.42 

-0.37 


04E-03 
62E-03 
42E-03 
25E-03 
99E-03 
59E-04 
67E-04 
2LE-03 
67E-03 
62E-03 
00E-03 
10E-03 
9  7E-03 
7  2E-0  3 
73E-03 
52E-03 
32E-03 
55E-04 
10E-04 
33E-04 
60E-04 
47E-04 
40E-04 


-0.1 

-0.9 

-0  .1 

0.8 

0  .2 

0  .3 

0.4 

0.5 

0.5 

0.4 

0  .4 

0.3 

0.2 

0.1 

0.8 

0.3 

-0.3 

-0.2 

-0.4 

-0.4 


753E-04- 

5C8E-03- 

84IE-03- 

0L6E-03- 

945E-03- 

547E-03- 

863E-04- 

789E-04 

671E-04 

1C5E-03 

471E-03 

596E-03 

4C0E-03 

416E-03 

973E-03 

169E-03 

226E-03 

321E-03 

615E-03 

548E-04 

C96E-04 

288E-05 

6C3E-04- 

065E-04- 

297E-04- 


0.90 
C.  13 
0.16 
0.17 
0.15 


12 

70 


0.20 
C.95 
0.20 
0.32 
0.4L 
0.48 
0.47 
0.44 
0.38 
0.30 
0.22 
0.16 
C.90 
0.40 
C.50 
0.20 
0.39 
■0.50 
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6000E- 
L10 

1390E- 
152 

L4C0E- 


04 
•03 

03 
■03 

03 


60C0E-04 
1036E-03 

1278E-03 
-03 


0.6000E-04 
0  ,c>786F-04 
0.U76E-03 

0  . .; 


0.1197E-03  0.1.012E-03 


0.60GCE-04 
0.9  2  80E-04 
0.1087E-03 
0 .  1 0  4  2  E- 
0.8497E- 


0.6CC0E-04  0.60 
0.8890F-04  0.85 

0.LCL9E-03     0.95 

n  tc?  c  r  r p  ? 

6.  7 2 49 E -04     C.60 
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0 
•0 

■0 
■0 

■0 
•0 
■0 

■0 

0 


■0.1 

■0.4 
0.4 
0.  1 
0.  1 
0.  I 
0.1 
0.  1 
0.7 
0.4 
0.9 


000E- 

OOOE- 
750E- 
OOOE- 
I  OOE- 
420E- 
350E- 
74  OE- 

ecoE- 

500  E- 

,;  r  C  E  • 
?COE- 
1.0  0E- 
400E- 
320!  • 
2C0E- 
020E- 
500F- 
5C0F- 
OOOE- 


04  0 
■04-0 

C3-0 
■03-0 

03-0 
■03-0 
•03-0 
■03-0 

03-0 
■03-0 

03-0 
•04  0 
■03  0 
■03  0 
■03  0 
■03  0 
■03    0 

04  0 

04  0 
•05  0 


.5728E 
.46  1.8F 
.15 
.25' 
.3528E 
.3880E 
.3785E 
.3300E 
.25  20E 
73E 
.43  73E 
.3640^ 
.9728E 
. 1 247E 
.1193E 
.L060E 


04    0 

04-0 

03-0 

03-0 

03-0 

•0  3-0 

•03-0 

•03-0 

•03-0 

■03-0 

•04-0 

•04    0 

04    0 


03  0 

03  0 
875CF-04  0 

04  0 
04  0 
04-  0 


.6355E 
.3864E 
.  L0  53E 


.45  7 
.427 
.134 
.223 
.300 
.32  9 
.327 
.290 
.226 
.125 
,42  5 
.313 
.857 
,11C 
.107 
.932 
.743 
.531 
.328 
.119 


2E-04 

2E^04- 

2E-03- 

8E- 

8E-03- 

4E-03- 

2E-03- 

OE-03- 

6E-03- 

7E-03- 

7E-04- 

2E-04 

2E-04 

9E-03 

7E-03 

9E-04 

2E-04 

5E-04 

6E-04 

IE- 04 


0.3 

0.3 
0.1 
0.  1 
0.2 
0.2 


0.9 
0.9 
0.  8 
0.6 
0.4 
0.2 
0.  I 


561E-04 
i  -04- 
172E-03- 
9  13E-03- 
5 52 E- 03- 
824E-03- 
823E-03- 
550E-03- 
043E-03- 
156E-03- 
156E-04- 
687E-04 
561E-04 
873E-04 
761E-04 
217E-04 
279E-04 
4C5E-04 
780E-04 
312E-04 


0.2 
0  .3 
0  .1 
0.  i 
0  .2 
0.2 
0.2 


0  .1 

0.4 


0.8 
0.8 
0.7 
0.5 
0.3 
0.2 
0.  1 


7  80 
734 
04  1 
667 
2C1 
462 
476 
280 
872 
078 
078 
243 
780 
9  36 
980 
358 
3  90 
7C2 
390 
4C6 


E-04 

E-04- 

E-03- 

E-03- 

E-03- 

E-03- 

E-03- 

E-03- 

E-03- 

E-03- 

E-04- 

E-04 

E^04 

E-04 

E-04 

E-04 

f-04 

E-04 

E-04 

E-04 


0.20 
0.35 
0.91 
0.14 
C.18 
0.21 
0.21 
0.20 
0.17 
0.10 
0.40 
0.20 
0.60 
0.80 
0.82 
0.65 
0.45 
0.30 
0.20 
0.15 
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*  C 
-iJCB  G 
-^ASSIG 
-iFORTR 
C   SEC 


100 

10 

1C1 

102 

12 

102 

2C 


2CC 
WHEN 

30 
TRAN 

11 
111 

201 

RESC 


1C6 

202 

1G7 

C  MANU 
15 

17 

16 


-tLOAC 

-.DATA 

POCC 

P025 

P002 

P022 

P0C4 

P005 

POi 

P010 

P011 


OORDINA 
AL1225 
N  6=N0 
AN  LS,G 
TION  CH 
D I  FENS  I 
INTEGER 
DATA  IF 
DATA  Nl 
READ( 5, 
FORMAT! 
DC  10  T 
CALL  SE 
WRITE (6 
FORMATt 
READC  5, 
FCRMAT{ 
CALL  RE 
DC  12  I 
CALL  SC 
WRITE (6 
FCPMATC 
DC  20  I 
CALL  SC 
WRITE(6 
FORMATC 

READY 
OUTPUT* 
SFGRMAT 
CALL  CO 
CALL  AD 
WRITE < 6 
FORMAT ( 
ALING  0 
PSIMAX= 
PSI=PSI 
A=SIN(P 
B=COS(P 
WRITE (6 
"  A  T  ( 
WRITE(6 
FORMAT ( 
XC1D0T= 
YC1D0T= 
WRITE (6 
FPRMATC 
CALL  DA 
AL  DIGI 
IF(TEST 
CALL  HO 
IFCTEST 
CALL  CO 
IFtTEST 
CALL  RE 
PAUSE 
GC  TO  1 
END 
XRfMAP 


TES  TRANSFORMATION  FOR  SHIP  NO  1 


C 

ECK 

ON 

PO 
LAG 
/2  4 
100 
A4, 
=  1, 
TPO 
t  10 
A4, 
102 
A4) 
SET 
=  1, 
AN( 
,10 

=  i5 
AN( 

,20 

A4, 


ING  POT  AND  AMP  VALUES  FOR  SHIP  #1 

POT  AD (30),  POTVAL ( 30 ) , AMPAD( 3  0 ) , AMPVAL(30) 

TAD, AMPAD 

/O/, IFLAG1/0/ 

/ 

)  (POTADU  )  ,  POTVALC  I  )  ,  1  =  1, Nl.) 

F10.4) 

Nl 

T(POTAD( I) ,POTVAL( I ) ) 

1)  (POTAD( IJ ,POTVAL(  I  )  ,  1  =  1, Nl ) 

F 1  0  .  4  ) 

)  ( AMPAD ( I } , 1=1,29) 

(1000) 

29 

AMPAD ( I ) ,  AMPVAL ( 1 ) ) 

3)  CAM  PAD ( I  )  ,AMPVAL(I  )  ,1=1,29) 

F10.6) 

Nl 

POTAD( I ) , POTVAL ( I ) ) 

0)  (POT ADC  I) , POTVAL ( I )  , I  =  1,N1) 

F  1  0  .  6  ) 


10 

10 

K< 

F 

0. 

MA 

SI 

SI 

,1 


,2 
c 

Ul 

Ul 

,1 

I 

C( 

TA 
(1 
LD 
(  1 

('3 
SE 

1 


1  ) 

N 

UT 

0, 

01 

•t 

PS 

26 

X* 

) 

) 

06 

02 

: 

BA 

07 

i! 

L 
)  . 


•READY5 
OF  COORDINATES 

F 


FOR    SHIP    #1 


U1BAR,  1 
)  U1BAR 
'UIBAR' 
IBAR 

PSIBAR 


V1BAR,2,PSIBAR  ) 
V1BAR, PSIBAR 
E14.8,2X, ;V1BAR 


,E14. 8,2>,  'PSIBAR* 


)  A 

•  A  = 
)  P 

•  PS 
R* 
R*A 
)  X 
!X0 
X01 
SWI 
GT. 


,B 
•  , 

SI 

1  =  ' , 

-V1B 
+  V1B 
01D0 
1D0T 
DOT, 
TCH« 
0)  G 


E14.8  ,2X, ' B=5 ,E14.8) 

) 


E14. 
AR*A 

AR-B 
T,YO 
=  ',E 
2,Y0 
0'  A 
0  TO 


1.D0T 

14.a,2X, • Y01D0T=' ,E14.8) 
1D0T) 
ND  ■  1" 
16 


)  .LT.O)  GC  TO  17 

UTE 

)  .GT.O)  GO  TO  111 

T(IOOO) 


2000 
2860 
0803 
2860 
0404 
0052 
166  0 

2383 
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P012 

0. 

,4717 

P013 

0 

.0250 

P015 

c, 

.5607 

P0  16 

c, 

■  1340 

P017 

0, 

.000 

P020 

0, 

.0920 

P021 

0, 

,C097 

P022 

0, 

,3576 

P053 

c. 

.0905 

PC27 

0, 

.1750 

P055 

0, 

.1497 

P05C 

0. 

,0337 

P051 

0, 

.3000 

P0  5  6 

0. 

,0092 

P057 

c. 

,4  540 

AOOl 

DOOL 

A002 

A003 

D003 

A201 

A006 

A005 

D0C5 

AGIO 

A014 

A016 

A013 

D0L3 

A017 

D017 

A022 

A203 

A  112 

A060 

A053 

D053 

A206 

A200 

A051 

D05  1 

A057 

D057 

A202 
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COMPUTER  PROGRAM  IVB 


*  C 
-JOB  G 
-iASSIG 
-iFCRTR 
C   SEC 


LOO 

1C 

LOl 

102 

12 
103 

2C 


C  I 


20C 

HEN 

30 
TRAN 

LI 
LL2 
RESC 


C  MAKU 
L8 

2L 

19 


-LOAC 
^DATA 
P024 
P054 
P026 
POOL 
P03C 
P045 
P03L 
P023 
P034 
P0C3 
P046 
P032 
P035 
P047 
-P036 
PQ37 
P04  1 


OCRDINA 
ALL225 
N  6  =  N0 
AN  LS,G 
TIGN  CH 
DIMENS1 
INTEGER 
DATA  IF 
DATA  N2 
READ(5, 
FORMAT ( 
DC  LO  I 
CALL  SE 
WRITE (6 
FCPMAT( 
READ( 5, 
FC  PI- 
CALL  RE 
DC  12  I 
CALL  SC 
WRITE (6 
FORMAT ( 
DC  20  I 
CALL  SC 
WRITE (6 
FCPMATl 

READY 
OCTPUT( 
S FORMAT 
CALL  CO 
CALL  AD 
ALING  0 
PS2MAX= 
PS2=PS2 
A2=SIN( 
B2=C0S( 
XC2D0T= 
YC2D0T- 
CALL  DA 
AL  DIGI 
IF(TEST 
CALL  HO 
IF(TEST 
CALL  CO 
IF(TEST 
CALL  RE 
PAUSE 
GC  TO  L 
END 
XRf MAP 


TES  TRANSFORMATION  FOR  SHIP  NO  2 


ECK 

ON 

PO 
LAG 
/22 
100 
A4, 
=  1, 
TPC 
,  LO 
A4, 
L02 
A4) 
SET 
=  L, 
AN( 
,10 
A4, 
=  1, 
ANl 
,20 
A4, 

LOL 

ION 

MPU 

K(4 

F  P 

0.2 

MAX 

PS2 

PS2 

U2E 

U2I 

C(5 

TAL 

(2) 

LD 

(2) 

MPU 

(4) 

SET 


T  AND  AMP  VALUES  FCR  SHIP  it? 

3  0),POTVAL( 30) , AMP AD (30) ,AKPVAL(30) 

PAC 

LAG1/0/ 


ING  PO 

POT  AD ( 

TADT  AM 

/O/,  IF 

/ 

)     (POTAD(I)  ,POTVAL(  I  )  , 1  =  1, N2) 

F10.4) 

N2 

TCPOTA 

L)  (PO 

F  1 0  . 4  ) 

)  (AMPADU  )  ,1=1,27) 


D( I ) ,POTVAL( I) ) 

TAD (I  )  ,POTVAL( I  )  ,I  =  1,N2) 


(1000) 
27 

AMPAD( 
3  )  (  AM 
FLO. 6) 
N2 

POTAD( 
0) (POT 
FLO. 6) 


I )  , AMPVAL (  I  )  ) 

FAC(I  )  ,  AMPVALU  )  ,1=1,27) 


I ) ,POTVAL( I ) ) 

AD( I ) ,POTVAL( I )  ,  1  =  1, N2) 


DY« 

ORDINATES    FOR    SHIP    ft? 


)     «REA 
OF    CO 
TE 

,U2BAR,5,V2BAR, 6,PS2BAR) 
S2BAR 


*PS2BA 
) 
) 

AR*B2- 
AR*A2+ 
,Y02D0 
SWITC 
.GT.O) 

.LT.O) 
TE 

.GT.O) 
(LOOO) 


R 


V2BAR*A2 
V2BAR*B2 

T, 6,X02D0T) 
H   «2f  AND  «3' 
GO  TO  L9 

GC  TO  2L 

GO  TO  LL2 


.3000 
.2860 
.0803 
.L750 
•  C404 
.C920 
.0052 
.0905 
.L660 
.2  860 
0.47L7 
0.2379 
0.2383 
0.1.497 
0.C097 
0  ,  r 
0.  L340 
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P042 
P04  3 
P044 
P007 
P014 
A03L> 
D035 
A026 
A027 
D027 
A044 
A034 
A023 
D03  3 
A0  3  0 
A036 
A041 
C04i 
A043 
D043 
A042 
A104 
A052 
A007 
D0C7 
A205 
A2  0  4 
A065 
D065 
A214 
A061 
DG61 


C.0000 
C.5607 
0.3576 
0.0337 
0.00*32 
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:JCR 

<FCR 


C  ST 

I 
10 


PHA 

LEA 

GAL 

TRAN 

RE 

RE 

DI 

DI 

IN 

DA 

DA 

CRAG 

DO 


L 

20i 


20 
1 


300 


PF 
FC 
DC 
RE 
top 
FO 
DC 
WR 
FC 
CC 
toR 
FO 
DC 
\  l: 
I  FC 
3  CC 
ECTI 
RE 
5  FC 
DC 
5  CA 
hR 
5  FC 
RE 
5  FC 
CA 
DC 
5  CA 
WP 
3  FC 
DC 
C  CA 
toR 
5  FC 
EN  R 
C  OU 
AiMSF 
5  CA 
1  CA 
6R, 
SCAL 
PS 
PS 
PS 
A  = 
B  = 
XC 
YC 
PS 
A2 
B2 
XC 
YC 
C  I  N  T I 
C  REM! 


30 
1 
S 

ICO 

10 
X 
101 

102 

12 

X 
1C 

2 
X 

200 

C  WH 

3 

C  TR 

11 

11 

C  RE 


SE  I. 

DING 

1225 

LS,G 
AL  NM 
AL  NB 
PENS  I 
PENS  I 
TEGER 
TA  IF 
TA  NO 
E  OF 

10  J 
AD(5, 
PMAT( 

12  J 
AD(5, 
ITE(6 
PMAT( 

L1J  = 
ITE  ( 
RMAT< 
MINU 
ITE(6 
PMAT( 

13  J 
ITE  (6 
PMAT( 

MINU 
ON  CH 
A  D  (  5  , 
RMAT( 

105 
LL  SE 
ITE16 
RMAT( 
AD(5, 
RMAT( 
LL  RE 

12  5 
LL  SC 
IT E  ( 6 
RMATC 

20  I 
LL  SC 
ITEC6 
PMAT  ( 
EADY 
TPUT( 
CRMAT 
LL  CO 
LL  AD 
3,  ALP 
ING  0 
IMAX  = 
2MAX  = 
I=PS1 
SIN(P 
CCS(  P 
1D0T  = 
1D0T  = 
2  =  PS2 
=  S I N  ( 
=  COS( 


COMPUTER  PROGRAM  VA 


INTERACTION  FORCE  AND  MOMENT 
SHIP(SHIP  MODEL  NO  2) 


ARE  APPLIED  TO  TEE 


0 

AX, 

AR, 

CN 

ON 

PO 
LAG 
/48 
NCN 

=  lt 

100 
6E1 
=  1, 

100 

,20 
i  i 

1,2 

6,2 
i  i 

E 

,30 
<  t 

=  1, 

,30 
i  i 

E 

ECK 
100 
A  4  , 
1=1 
TPO 
,10 
A4, 
102 

;  '  I 

SET 
1  =  1 
AN( 
,10 
A4, 
=  1, 
AN( 
,20 
A4, 

101 
ION 
MPU 
K(  0 
EAR 
F  P 
0.2 
0.2 
MAX 
SI) 
SI  ) 
U1B 
U1E 
MAX 
PS2 
PS2 
U2B 
U2B 

TBA 


NDIM,NSCAL 

N.NBAR1 

Y(30,30)  ,N(30V30) 

POT  AD { 70)  ,POTVAL( 70 ) , AMPAD { 70 )  , AN PVAL (70  ) 

TAD, AMPAD 

/0/,IFLAGl/0/ 

/ 

DIMENSIONAL  ARRAY  FOR  NAND  Y 

25 

)  (Y( J,  I  ), 1=1,6) 

1.4) 

2  5 

)  (  N  (  J  ,  I  )  ,  I  =  1 , 6  ) 

0) 

, 'THIS  IS  Y( J,I  )  ■  ,//) 

5 

CI )  ( Y( J, I ) ,1=1,6) 

,10X,6{E  ll.4,2X) ,//) 

0) 

,'THIS  IS  N { J , I ) ' , / / ) 

25 

1)  (N( J,  I  )  ,1=1,6) 

,  10XT6(Eli.4,2X),//) 

ING  POT  AND  AMP  VALUES  FOR  SHIP  #1  AND  #2 

5)  (POTAD( I  )  ,POTVAL(  I  1  ,  1  =  1, NO) 

F10.4) 

,N0 

T(POTAD(  I ), POTVAL(  I  )  ) 

15)  (POTADf I ) ,POTVAL( I ) , 1=1, NO) 

F10.4) 

5)  ( AM  PAD (I  ) , 1  =  1 ,66) 

(1000) 

,66 

AMPAD  (  I  )  ,  AMPVAH  I  )  ) 

3)  (  AMPAD(  I  )  »  AMPVAH  I  )  ,1=1,66) 

F10.6) 

NO 

POTAD(  I  )  ,POTVAL( I ) ) 

05)  (POTADf I )  ,POTVAL( I  )  ,1=1 , NO) 

F10.6) 

)  'READY' 

OF  COORDINATES  FOR  SHIP  #1  AND  #2 
TE 

,U1BAR,1,V1BAR,2,PSIBAR,4,U2BAR,5,V2BAR,6,PS 
) 

SIBAR  AND  PS2BAR 
6 
6 
*PSIBAR 


AR*B-V1BAR*A 

AR*A+V1BAR*B 

*PS2BAR 

) 

) 
AR*B2-V2BAR*A2 

•:l*B2 
2-DIM.    ARRAY. PASS    BFTBAP     AND    ALPBAR 
R  =  1.0    CORRESPONDS    BETA=100.0    FEET*** 


211 


AL 
AL 


FB 

1  Q 


401 


40 

pi 


sc 


40 


404 


C  SE 
C  Fl 


AR 

NO 


C  ALPH 


C  AL 


PH 
1 


C  ALP 


LO 
10 
20 


2C3 


602 


603 


6  0  ■': 


A  R  =  1 .  0 

BETBAR 
W  R  I  T  E  (  6 
FORMAT ( 
WRITE (6 
FCPMAT( 
ALING  0 
ALPHA=5 
WRITE (6 
FORMAT ( 
WRITE(6 
B FT  A- 10 
WRITE ( 6 
FORMAT ( 
WPITE(6 
IF(BETA 
IF(BETA 
I  F( ALPH 
IF( ALPH 
CF  FOR 

CCRRES 
IEl=BET 
IB=1B1- 
BETAi=I 
WTE=(BE 
IF( ALPH 
IF(ALPH 
A  =  0 
IA=13 
WTA=0.0 
GC  TO  3 
A  LESS 
1  A  L=-AL 
ALPHA1= 
WTA=-( A 
IA=L3-I 
GC  TO  3 
A  GREAT 
IA1=ALP 
IA=13+I 
ALPhAl= 
WTA=( AL 
I  82  =  1 B  + 
IF<  IB.E 
IA2=IA+ 
I  F  (  I A  .  E 
WRITE (ft 
FORMAT { 
WRITE (ft 
FORMAT ( 
WPlTE(ft 
FORMAT ( 
W  R  I  T  E  (  6 
FORMAT( 
IF( ALPH 
I  F  (  I  A  .  E 
IF( WTA. 
I  F  (  WT  B  . 
NeARl=N 
WRITE (6 
FORMAT  ( 
W  R  I  T  E  (  6 
NBAR=N( 
W  P  I T  E  (  ft 
FCRMAT( 
WRITE(6 
BAPNL=( 
WRITE (ft 
FORMAT ( 
W  P I T  E  (  6 
1 


SPONDS 
ALPBAR 

OX, ' TH 
ALPBA 
0X,2F1 
HABAR= 
ALPBAR 


0X,f  THIS  IS  ALPHA*  ,//) 

ALPHA 

ETBAR 


CORRE 

AND 
,401) 

•  •  tl 
,402) 
«  '  tl 
F  ALP 
50.  C* 
,403) 
8  '  ,1 
,501) 
0.0*B 
,404) 

•  SI 
,501) 
.LT.5 
.GT.l 
A .  G  T . 
A.LT. 
INDET 
PONDE 
A/10. 

Bi*10 

TA-BETA!) /I 
A.LT.  0.0)  G 
A.GT.O.O)  G 


THAN  ZERO 

PHA/50.0 

-IA1*50 

LPHA-ALPHA1 

Ai 


ALPHA=550.0  FEET 

ARE  PAST  IN  COMPUTER  UNITS 

IS  IS  ALPBAR-BETBAR', // 1 

PtBETBAR 

1.6) 

ALPBAR  AND  BET AEAR=BET BAR 


OX, 'THIS  IS  BETA* ,//) 

BETA 
0.0)  0 
00.0)0 
550.0) 
-550.0 
IFICAT 
D  v  AN 
0 


UTPUT( 101)  BETA; NSC AL=O.C;YSCAL =0.0; 
UTPUT(101 )BETA;NSCAL=0.0;  VSCAL  =  0.0;G 
0UTPUT(10l)ALPHA;NSCAL=0.C;YSCAL=0.0 
)  OUT  PUT  (  LOU  ALPHA  ;  NSC  AL  =  0.0;YSCAL  =  0. 

ION  OF  ARRAY  ELEMENT 

D  N  -LINEAR  INTERPOLATION  IN  2-DIMEN 


0.0 

C  TO  1 

0  TO  2 


ER  TH 
HA/ 50 
Al 

IAl*5 
PHA-A 
1 

G.ft) 
1 

C  .  2  5  ) 
101) 

•  ,1 
102) 

'  ,1 
202) 

',' 
203) 

1  ,' 
A.LT. 
CI) 
EQ.C. 
EQ.O. 
(IA,1 
,602) 
'  '  ,  ' 
,502) 
IA,  IB 
,603) 


AN  ZER 
.0 

0 
LPHAI.  ) 

IB2=6 

IA2=2 
I B  1. ,  I 

OX, •  IB 

IA,  IA 

OX,  •  IA 

BETA1 

BETA1' 

WTA 
WTA=» , 
0.0)  I 
IA2=1 
0)  I A2  = 
0)  IB2 
B2) 

THIS  I 
NBAR1 
) 

THIS  I 
,502)  N3AR, 
NBAR1-NBAR) 
,604) 


1750.0 

C 

/50.0 


B ,  I B  2 , 1  A 1 

L='t  I3,5X,'  IB=%  13, 5X,  •  I  B2= « , I  3 , 5X  ,  • 

2 

=  »,  13, 5X, • IA2=« ,13,// 1 

,WTB, ALPHA1 

,E14.8,2X, «WTB«  ,E14.8,2X,  '  ALPHA 1« , El 

E14.8,//) 
A2=IA-1 

IA 
=  IB 


S    NBARl* , //) 
,IA, IB2 


S    NBAR« ,//) 
IA,  IB 
•^WTB  +  NBAR 


,501) 
(  ! 
W  R I T  E  ( 6  ,  ( 


THIS  IS  BARNi1 , //) 

BARN1 
IB2) 
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X 

X 
X 
X 
X 
X 

>: 

X 
X 
X 
X 
X 
X 
X 
X 
X 
X 
X 
X 
X 
X 


£C5 


606 
6  07 

50C 

5C 

60  8 
609 
6LC 
6il 
612 
6  1.2 
6CC 


60 
5C 
RE 


i 

W 

N 

I 

F 

s 

B 

F 
K 

N 

C  F 

1  F 
Y 

V\ 
F 

!' 
Y 
W 
F 
!-. 
B 
1> 
F 
W 
Y 
W 
F 
W 
Y 
W 
F 
W 
B 
W 
F 
K 
Y 
'.' 
F 
V* 
F 
F 


CRMAT 
RITE( 
RAR=N 
RITE( 

ORMAT 
RITE( 
ARN2- 

RIl '- ; 

CRMAT 
RITE( 
EAR=( 
RITE( 
ORMAT 


IA2 
,60 


,50 

IA, 

,60 
t  t 


,60 
(IA 
»61 

i    « 

,50 
IA2 
,61 

V    I 

50 


C 

C-  MA 


1 
2 
KEM 

*  D 
GNI 
N 

N 

N 

C  f'AGNl 

Y 

Y 

Y 

W 

C  F 

V, 

1  F 

W 

1  F 

W 

C  F 

UNK 

T42 

4  C 
NUA 

5  I 


X 

90 
X 

90 
X 

50  C 
X 

■  500 
C  TR 

80 

C  MA 

I 

i 

L 


7 


( 

I 

6 
( 

6,50 
(NBA 
6,60 
(  '  l 
6,50 
BARN 
o<50 
(  '  B 
RITE(6,50 
CRMAT {  •  « 
EAR1=Y  (IA 
RITE(6  ,60 
ORMAT ( 
R I T  E  (  6 
BAR=Y( 
RITE (6 
CRMAT( 
RITE( 6,50 
ARY1=( YBA 
RITE(6,61 
ORMAT (  •  ■ 
RITE(6 
BARLEY 
RITE (6 
G  P  M  AT  ( 
RITE(6 
BAR=Y( 
RITE  (6 
CRMAT( 
RITE  (6 
ARY2=( Y3A 
RITE (6,  61 
CRMAT (  •  ■ 
RITE (6  ,60 
BAR=( BARY 
RITE (6, 60 
ORMAT ( <  ' 
RITE (6, 60 
CRMAT (  •  » 
ORMAT (  »  • 
BER  Slf'UL 
I  VIDE  BY 
TIDE  SCAL 
NAX=4.  195 
CIM=NBAR* 
SCAL-NDIM 
TUDE  SCAL 
MAX=1.6C8 
DIM=YBAR* 
SCAL=YDIM 
RITE (6,  90 
ORMAT  (  •  • 
RITE(6 
ORMAT( 
RITE(6 
ORMAT( 
RITE(6 
ORMAT ( 
LINES 
3(4)  FOR 
ALL  DACd 
L  DIGITAL 
F(TEST  (1) 
ALL  HOLD 
F(TEST(  I) 
ALL  CO 
FC TEST (3  J 


IB) 
9 


TH 

N 

B) 

TH 

N 

-;: 

TH 

B 

BA 

TH 

N 

OX 

B2 

TH 
Y 


IS  IS  NBAR11 ,//) 
BAR1  ,  1A2, IB2 


TH 

Y 

-Y 

TH 

BA 
IB 

TH 

Y 

B) 

TH 

Y 

-Y 


IS  I 
BAR, 
BAR) 

IS  I 
ARN2 
RN1  ) 

IS  I 
BAR 
,E14 
) 

IS  I 
BAR1 


IS  I 

BAR, 
BAR) 

IS  I 
RY1 


IS  I 

BAR1 


IS  I 

BAR, 
BAR) 


S  NBAR' , //) 
IA2,  IB 
I  E-f-NBAR 


S  BARN2' ,//) 


*WTA+BARN1 

S  FINAL  NBAR' ,//) 
.8,//) 


THIS  I 

BARY2 

BARYL ) 


,90 

6    I 

,50 


50 

i 

T4 


THIS  I 

YBAR 
0X,E14 
,  10X,E14 
AT  I  ON  IS 
100.0  SI 
ING  OF  N 
E  +  07 
(9.428E+ 

IAX 
ING  OF  Y 
E+05 

(L7.87E+ 
/YMAX 

0)  NSCAL 
, «NSCAL= 

1)  NDIM, 
,  «  N  D I  M  =  « 
01)  X01D 
,' X01D0T 
00)  X32D 
,  'X02D0T 
26(7)  FO 
A207 
,X01D0T, 

SWITCH* 
.GT.O)  G 

.LT.O)  G 
.GT.O)  G 


S  YBAR1* ,//) 

, IA,  IB2 


S  YBAR« ,//) 
IA,  IB 
*WTB+YBAR 

S  BARY1' ,//) 


S  YBAR1* ,//) 
,  IA2,  IB2 


S  YBAR' ,//) 
I  A  2,  IB 
*WTB+YBAR 

S  BARY2« ,//! 

*WTA+BARY1 

S  FINAL  YBAR' ,//) 

.8,//) 

. 8,5X, «ROW=» ,I3,1X,'C0L=',I3) 

DONE  IN  COMPUTER  UNITS  SC  NO  NEED  T 
NCE  SUBR.  DAC  CONVERTS  BY  ITSELF  IN 


10) 


07) 

,YSCAL 

«,E14.6,5X,'YSCAL=',E14.6,//) 
YD!  M 

,E14.6,5X,'YDIN=',E14.6,//) 
QT, Y01D0T 
=',E14.6,«Y01DCT=«,E14.6,//) 

CT,Y02D0T 

=  •  , E14.6,  «Y02C0T=« , E14.6,//) 

R  A076,T427(8)  FCR  A072  ,  T422  (  3  ),  FOR 

2,Y01D0T,5fY02C0T,6,X02CCT,3tNSCAL,4 

0'  AND  • 1 » 
C  TO  16 

0  TO  17 

C  TO  111 
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-LCAC 
-DATA 
* 


CALL  RESET(IOOO) 

PAUSE 

GO  TO  115 

END 

XR,MAP 


THIS  IS  Y  ARRAY 


-0.  I 

-0.2 

-0.3 

-0.3 

-0.4 

-0.3 

-0.2 

-0.1 

0.4 

0.2 

0.5 

0.7 

0.8 

0.9 

0.8 

0.6 

0.4 


-0.2 
-0.5 
-0.6 
-0.5 
-0.  1 


4C0F- 
4C0F- 
20CE- 
800F- 
CCOE- 
500E- 
600F- 
300E- 
CCOF- 
700E- 
COCE- 
OOOE- 
5C0F- 
COOF- 
200F- 
2  50E- 
5C0F- 

7C0F- 
COOE- 
CCOE- 
COOF- 
COOF.- 
OOOE- 
00  OF- 


03-0 
03-0 
03-0 
•03-0 
03-0 
03-0 
■03-0 
■03-C 
■04  0 
03  0 
03  0 
03  0 
■03  0 
03  0 
03  0 
03  C 
03  0 
■03  0 
03  0 
•04  0 
•04-0 
04-0 
•04-0 
■04-0 
■04-0 


.1263E- 
.2U2E- 
.2762E- 

.3225E- 
.3337E- 
•  2870E' 
.2079E- 
.9384E- 
.5507F- 
.25  03E- 
.4507F- 
.6225F- 
.7500E- 
.7844E- 
.7159E- 
.5579E- 
.4089F- 
.2781E- 
.1673E- 
.6822F- 
.3562E- 
.3493F- 
.4904E- 
.46  99E- 
.2096E- 


03- 
OS- 
OS- 
■03- 
03- 
■03' 
03- 
■04- 
■04 
•03 
■03 
03 
03 
03 
03 
■03 
•03 
03 
•03 
•04 
•05 
■04- 
•04- 
■04- 
04- 


■0.1160E- 

■0.1897E- 

•0.2433E- 

0.2793E- 

•0  .2840E- 

•0.2397E- 

0.1689E- 

•0.6671E- 

0.6637E- 

0.2364E- 

0.4137E- 

C.5643F- 

0  .6750E- 

0.6977E- 

0.6378E- 

0.5075c- 

0.3781E- 

0.2616E- 

0.1652E- 

0.7438E- 

0  .8767E- 

•0.2363E- 

■  0.4082  E- 

•0  .4473E- 

■0.2918E- 


03-0 
03-0 
03-0 
03-0 
03-0 
■03-0 
03-0 
•04-0 
04  0 
03 
03 
03 
•03 
03 
03 
03 
03 
03 
03 
04 
05 


04-0 
04-0 
04-0 

04-0 


.  1. 0  5  8 
.16  81 
.2104 
.2362 
.2  342 
.1925 
.1299 
.3  9  59 
.7767 
.2221 
.3767 
.5062 
.6  000 
.6110 
.5597 
.4572 
.3473 
.2452 

„  ]  6  .:-. 

.8055 
.2110 
.  1  2  3  3 
.3260 
.4247 
.3740 


E-03 
F-03 
E-03 
E-03 
E-03 
E-03 
E-03 
E-04 
E-04 
F-03 
E-03 
F-03 
F-03 
F-03 
E-03 
F-0  3 
F-03 
E-03 
E-03 
E-04 
E-04 
E-04 
E-04 
E-04 


-0.2 


0.8 
0.2 
0.3 
0.4 
0  .5 


0.5 
0.4 
0.4 
0.3 
0.2 


0.1 
0.8 
0.3 
0.3 
C.2 
0  .4 
E-04-0.4 


753E-04- 

5C8E-03- 

841E-03- 

C16E-03- 

945F-03- 

547E-03- 

863E-04- 

789E-04 

671F-04 

1C5E-03 

4  71 E-03 

596F-03 

4C0E-03 

4 16 E-03 

973E-03 

169E-03 

226E-03 

321E-03 

615E-03 

548E-04 

096E-04 

288E-05 

6C3E-04- 

06 5 E-04- 

397E-04- 


0.90 
0.  13 
0.16 
0.17 
0.15 
0.12 
C.70 
0.20 
0.95 
C.20 
0.32 
0.41 
0.48 
0.47 
0.44 
0.38 
0.30 
C.22 
0.16 
0.90 
0.40 
0.50 
■0.20 
■0.39 
•0.50 


THIS  IS  N  ARRAY 


0. 

0. 

0. 

0. 

0. 

0. 
-0. 
-0. 
-0. 
-0. 
-0. 
-0. 

-o. 

-0. 

-o. 
-o. 

0. 
0. 
0. 

o. 
c. 

0. 
0. 

c. 
c. 

POOO 
P04C 


6C00F 
11C0F 
1390F 
1530F 
14  00- 
7C00F 
5000E 
1  7  5  0  F 
3C00F 
4100F 
4  A  7  0  F 
4350F 
374CE 
2800F 
1500E 
4500F 
4  200E 
HOOF 
14  OOF 
1320F 
12CCF 
L020F 
7500E 
4  501 
90  C 
C  . 


-04  0 
-03  0 
-03  0 
-03  0 
-03  0 
-04  0 
-04-0 
-C3-0 
-03-0 
-03-0 
-03-0 
-03-0 
-03-0 
-03-0 
-03-0 
-03-0 
-04  0 
-03  0 
-03  0 
-03  0 
-03  0 
-03  0 
-04  0 
-04  0 
-05  0 
1511 
1600 


.6000E 
.1036F 
.127<:!: 
.13495 
.  H97E 
.5728F 
.46  18E 
. 1536E 
.2598E 
.3528F 
.3880E 
•3785F 
.33C0E 
.2520E 
.1373E 
.4373E 
.3640F 
.9728E 
.1247F 
.1193F 
.1060E 
.8750F 
.6355E 
.3864F 
.  1053E 


-04 
-03 
-03 
-03 
-03 
-04 
-04: 
-03- 
•03- 
-03- 
•03- 
-03- 
■03 
-03- 
■03- 
-04- 
04 
•04 
■03 
-03 
•03 
•04 
-04 
■04 
•04 


0.6000E- 
0.9786E- 
C.1176E- 
0  .11P6E- 
0.10! 
0.4572E- 
■0  .4272E- 
0.1342E- 
0.2238E- 
•0.3008E- 
0.3294E- 
0  .3272F- 
0.29C0E- 
•0.2266F- 
■0  .1257E- 
•0.4257E- 
0.3122E- 
0  .8572E- 
0.11C9E- 
0  .1077E- 
0.9329E- 
0.7432E- 
0.5315E- 
0.3286-- 
0.119  1E- 


04  0 
04  0 
03  0 
03    0 

03  0 

04  0 
04-0 

■03-0 

03-0 

03-0 

03-0 

03-0 

03-0 

•03-0 

■03-0 

■04-0 

04    0 

04    0 

03    0 

03  0 

04  0 
04    C 

•04    0 

■04    0 

04    0 


.60 
.92 
.  10 
.  10 
.84 
.35 
.39 
.11 
.19 
.25 
.28 
.28 
.25 
.20 
.11 
.41 
.26 
.75 
.98 
.97 
.82 
.62 
.44 
.27 
.13 


COE- 
80E- 
87E- 
42E- 
97E- 
61F- 
6  8E- 
72E- 
13E- 
52E- 
24E- 
23E- 
50E' 
43E- 
56E- 
56F- 
8  7E- 
61E- 
73E- 
6  1E- 
17E- 
79E- 
C5E- 
80F- 
13F- 


■04  0 
04  0 
03    0 

03  0 

04  0 
•04     0 

04-0 
•03-0 
03-0 
•03-0 
■03-0 
03-0 
■03-0 
•03-0 
03-0 
■04-0 
•04-  0 
•04  0 
■04  0 
•04  0 
•04  0 
•04  0 
04  0 
■04  0 
04    0 


.60C 
.885 
.  101 
.53C 
.724 
.278 
.373 
.1C4 
.  166 
.220 
.24  6 
.247 
.228 
.  187 
.107 
.4  0  7 
.224 
.678 
.893 
.898 
.735 
.539 
.37C 
.23? 
c  1  4  C 


OE-04 

CE-04 

9E-03 

8E-04 

9E-04 

OF-04 

4E-04- 

1E-03- 

7E-03- 

1F-03- 

2E-03- 

6E-03- 

0E-03- 

2E-03- 

8E-03- 

8E-04- 

3E-04 

OF-04 

6F-04 

OE-04 

8E-04 

0c-04 

2E-04 

OE-04 

6E-04 


0.60 
0.85 
0.95 
C.82 
C.60 
C.20 
0.35 
C.91 
0.  14 
C.18 
0.21 
0.21 
0.20 
0.17 
0.10 
0.40 
0.20 
C  .60 
0.80 
C.82 
C.65 
C.45 
0.30 
C.20 
0.  15 
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P052 

0 

.  1600 

P02  5 

0 

.2860 

P0C2 

0 

.0803 

P033 

0 

,28<  0 

PCC4 

c 

.0404 

P0C5 

c 

.0052 

P006 

0 

.1660 

PC  10 

0 

.2379 

PCI  L 

0 

.2383 

P012 

0 

.4717 

P013 

0 

.C250 

P015 

c 

.5607 

P0  16 

0 

.  1340 

P02C 

0 

.0920 

P021 

0 

.0097 

P022 

0 

.3576 

P053 

c, 

.0905 

P027 

0 

.1750 

PC55 

0 

.1497 

P050 

0 

.0337 

P051 

0, 

.4380 

P056 

0, 

.CG92 

P057 

c 

.9540 

P0  2  4 

0, 

.1581 

PG54 

c, 

,2860 

P026 

0, 

.0803 

P001 

0, 

,1750 

P03C 

c. 

,0404 

P045 

0, 

,0920 

P031 

0, 

,0052 

P023 

c, 

,C905 

P034 

0, 

,  1660 

P003 

0. 

,2860 

P046 

c. 

.4717 

PO^? 

0. 

,2379 

P03  5 

0, 

,2383 

P047 

0. 

,  1497 

P036 

0. 

,0097 

P037 

0. 

C250 

P041 

0. 

1340 

P043 

0. 

5607 

P044 

0. 

3576 

P0C7 

0. 

0337 

P014 

0. 

C092 

PC 4  2 

0. 

1511 

P017 

0. 

1581 

A001 

DCC1 

A002 

A  00  3 

D003 

A201 

AD06 

A005 

DC05 

AGIO 

A  0  1  4 

A016 

A013 

D012 

A017 

C017 

A022 

A  20  3 

AL12 

A060 

A053 

C053 

A  20  6 

A20G 

A051 

D  0  5  1 
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A057 
DC  5  7 
A202 
A  0  3  5 

D0?5 

A026 

A027 

D027 

A  04  4 

A034 

A032 

C033 

A030 

A036 

A04  I 

D041 

A043 

C043 

A042 

A1C4 

A052 

A007 

DCC7 

A205 

A204 

AC65 

D065 

A214 

A061 

D061 

A21i 

A06<: 

A056 

A024 

A216 

A212 

A207 

A064 

A21C 

A2  12 
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^joe 

-tFCR 


C  ST 

I 

10 


12 

C  KA 

X 

2CC 


20 
i 


30C 


X 
30 
1 

c     s 

100 

10 
X 

101 

1C2 


125 

X 

103 

2C 
X 

2005 
C  WF 

3 

C  TR 
11 
11 

C  RE- 


PHASE  I. 

LEADING  S 
GAL  1225 

TRAN  LS,G 
REAL  NM 
REAL  NB 
DINENSI 
D  I  KENS  I 
INTEGER 
DATA  IF 
DATA  NO 

CRAGE  OF 
DO  10  J 

0  READ(5, 
C  FORMAT! 

DC  12  J 
PEAC(5, 
NUAL  SWIT 
IFd'EST 
Is  RITE  (6 
FORMAT! 
DC  I1J  = 
WRITE  ( 
FORMAT ( 
CCNTINU 
V,RITE(6 
FCRMATC 
DC  13  J 
WRITE (6 

1  FORMAT ( 
3  CCNTINU 
ECTION  CH 

READ(5, 
5  FORMAT ( 

DC  105 
5  CALL  SE 
WRITEC6 
5  FORMAT( 
READ(5, 
5  FCRMATC 
CALL  RE 
DC  12  5 
CALL  SC 
WRITE (6 
3  FORMAT ( 
CC  20  I 
C  CALL  SC 
WRITE (6 
5  FORMAT ( 
EN  READY 
C  OUTPUT! 
AN S FORM AT 
5  CALL  CO 
1  CALL  AD 
6R  ,3, ALP 
SCALING  0 
PSIMAX= 
PS2MAX= 
PSI=PSI 
A=SIN(P 
E=COS(P 
XC1D0T= 
Y01D0T= 
PS2=PS2 
A2=SIN( 
B2=C0S( 
XC2D0T= 
YC2D0T= 


COMPUTER  PROGRAM  VB 


INTERACTION  FORCE  AND  MOMENT  ARE  APPLIED  TO  THE 
HIP (SHIP  MODEL  NO  1) 

C 

AX,NDI FrNSCAL 

AR,N,NBAR1 

Y!30,30)  ,N(30,30) 
ON  POT  AD (70) ,  P0TVAH70)  , AM PAD (70)  ,  APFVAH70) 

POTAD, AMPAC 
LAG/C/, IFLAG1/0/ 
/48/ 

NONDIMENSICNAL  ARRAY  FOR  NAND  Y 
=  1,25 

10  0)  (Y(J,I),I=1,6) 
6EU.4) 
=  1,25 

100)  (NU,  I  ),I  =  1,6) 

CH  •?•  UP  FOR  BYPASS  SETPCTAND  SCAN 

(2).GT.0)  CALL  RESET  (  LOOO )  ;CALL  CCPFUTEjGO  TO  1 

,200) 

'  • ,'THIS  IS  Yl J, I )  '  ,//) 

1,25 

6,201)  (  Y  (  J  ,  I  )  ,  I  =  1  ?  6  ) 

'  •  , L0X,6( El  1.4,2X)  ,//) 

E 

,300) 

•  •  , 'THIS  IS  N( J, I ) ■  ,//) 

=  1,25 

,301)  { N (J,  I  )  ,  1=1, 6 ) 

1  ■  ,  10X,6{ Eli.4,2X) ,//) 

E 

ECKING  POT  AND  AMP  VALUES  FCR  SHIP  HI    AND  it 2 

1005)  ( POTAD ( I  ) ,POTVAL( I  )  ,1  =  1, NO) 

A4,F10.4) 

1  =  1,  NO 

TPGT( POTAD ( I ),POTVAL(  I  )  ) 

,1015)  ( POTAOt  1  ),POTVAL(  I  ),  1=1, NO) 

A4,F10.4) 

1025)  (AMPADl I  ), 1  =  1,66) 

A4  ) 

SE1  (  1000) 

1=1,66 

AN( AMPAD( I ) , AMPVALf I ) ) 

,  103)  (AM  PAD! I  ) , AMPVAH I  )  ,  1  =  1,66) 

A4,F10.6) 

=  i,NO 

AN (POTAD! I )  , PGTVAL (  I  5  ) 

,2  005) (POTAD! I ) ,POTVAL(I ) ,1=1, NO) 

A4,F10.6) 

101)  'READY' 

ION  OF  COORDINATES  FOR  SHIP  #1  AND  H2 
MPUTE 

K(0,U1BAR,1,V1BAR,2,PSIBAR,4,U2BAR,5,V2BAR,6,PS 
BAR) 

F     PSIBAR    AND    PS2BAR 
0.26 
0.26 

MAX*PSIBAR 
SI) 
SI  ) 

l.'l  PAP*R-VIBAR*A 
U1BAR=A+V1BAR^B 
MAX*PS2BAR 
PS2) 
PS2) 

"  ■       •     B2-V;      *R*A2 
>*A2+V2BAR*B2 
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c 
c 
c 
c 

X 
X 

c 

X 
X 
X 
X 


X 
X 
X 

X 


INTE 
REME 
ALPB 
ALSO 

401 

402 

RESC 


40  2 


40^i 


C  SEAR 
C  FIND 


C  ALPH 


C  ALPH 
1 


C  ALFH 
2 


101 
102 
202 
202 


602 


602 


6  C  k 


RPO 
MBE 
AR  = 

BE 
V*RI 
FCR 
WRI 
FCR 
ALI 
ALP 
WRI 
FOR 
WRI 
BET 
WRI 
F  G  R 
WRI 
IF( 
IF( 
IF( 
IF( 
CF 

CC 
IE1 
IE- 
BET 
WTP 
IF( 
IF( 
A  = 
I  A  = 
WTA 
GO 
A  L 
I  Al 
ALP 
WTA 
IA  = 
GC 
A  G 
IA1 
IA  = 
ALP 
WTA 
IE2 
IF( 
IA2 
IF( 
WRI 
i  '  i 
WRI 
FEE 
WPI 
FCR 
WRI 
FOR 
IF( 
IF( 
IF( 
IF( 
NBA 
WRI 
FCR 
W  R  1 
NBA 
WRI 
FCR 
WRI 
BAR 
WRI 

WRI 


,4 


k 


LATICN 
ETB 
L.O  CC 
R  A 
TE(6 
MAT( 
TE(6 
MAT(  s 
NG  OF 
HA=5  50 
TE(6,4 
MAT(  « 
TE(6,5 
A=LO0. 
T  E  (  6  , 4 
MAT(  • 
TE(6,5 
BETA.L 
BETA  .G 
ALPHA. 
•  i  PHA. 
FCR  IN 
RRESPO 
-BETA/ 
IB1-4 
A1=IB1 
=(BETA 
ALPHA. 
ALPHA. 
0 

13 

=  0.0 
TO  3 
ESS  TH 
=-ALPH 
HA1=-I 
=-•  (  ALP 
13-1 Al 
TO  3 
REATER 
=  A  L  P  h  A 
13+1 Al 
hA  1=1  A 
=(ALPH 
=  IB+1 
IB  .EC. 
=  IA+l 
I A  .  E  C . 
TE(6  ,1 

[   « 
TE(6  ,1 
MAT(  « 
T  E  (  5  ,  2 
MAT  {  • 
TE(6,2 
MAT(  » 
ALPHA. 
IA. EQ. 
WTA.EQ 
WTB.EQ 
Ri=N(I 
TE(6,6 
MAT( 


IN  2-0  I M 

AR=1  .0  CC 

•  PON  US 

NC  ALPBAR 

01) 

• ,10X, • TH 
02)  ALPBA 
e ,10X,2F1 
ALPHABAR= 
.C*ALPBAR 
02) 

■  ,  10X,  'TH 
01)  ALPHA 
0*BETBAR 
04  ) 

• ,10X, ' TH 
01JBETA 
T.50.0)  0 
T.  100.0)0 
GT.5  50.0) 
LT. -550.0 
DETIFICAT 
NDED  Y  AN 
10.0 

*10 

-BETA1  )  f\. 
L  T  .  0  .  0  )  G 
GT.O.O)  G 


AN  ZERO 
A/50.0 
A  1*50 
HA-ALPHA1 


.  ARRAY. PASS 
RRESPONDS  BET 
ALPHA-550.0 
ARE  PAST  IN 


BFTBAR  AND  ALPBAR 

A=100.0  FEET*** 

FEET 

COMPUTER  UNITS 


IS  IS  ALPBAR-BETBAR' ,// ) 

RtBETBAR 

1.6) 

ALPBAR  AND  BET ABAR=BETBAR 


IS  IS  ALPHA' , //) 


IS  IS  BETA' ,//) 


UTPUTflOl)  BE 
UTPUTQ01)  BET 
OUTPUT(  10  DAL 
) OUT  PUT ( 101)  A 
ICN  GF  ARRAY 
D  N  -LINEAR  I 


0.0 

0  TO  1 
C  TO  2 


ta;nscal=o.c;yscal=o.o; 
a;nscal=o.O;yscal=o.o;G 
pha;nscal=c.c;yscal=o.o 
lpfa;nscal=o.o;yscal=o. 

ELEMENT 

NTERPOLATICN  IN  2-DIMEN 


THAN 
/50.0 


ZER 


1*50 
A-ALPHA1 ) 

6)  IB2=6 


T  E  (  6  ,  5 

R=Nl  IA 

TE(6,6 

MAT(  • 

TE(6,5 

N1=(NB 

TE(6,6 

[  ' 
I  (6,5 


25)  IA 

01)  IB 
• ,10X, 

02)  IA 

•  ,10XT 

02)  BE 
• ,'BET 

03)  WIT 

•  ,  'VTA 
LT.0.0 

IA2 
0)1 
.0) 
IB2) 
02) 

«  ,'THI 
02)  NB 
,  IB) 
03) 

'  ,  'THI 
02)  NB 
AR1.-NB 
04) 

' , 'THI 
01)  BA 


1) 

.0 
.0 
At 


2  =  2 
It  I 
■  IB 
,  IA 
1  IA 
TA1 
Al1 
A 

=  '  T 

)  I 
=  1 

A2  = 
IB2 


S  I 

AR1 


S  I 

AR, 
AR  ) 


J/50.0 

C 

/50.0 


B ,  I B  2 , 1 A 1 

1=' , 13, 5X,  'IB 

2 

=« , I3,5X,« IA2 

,  WTB, ALPHA  1 

,E14.8,2X, 'WT 

E14.8,//) 

A2=IA-1 


=  6  ,13, 5X,  '  IB2-« ,13  ,5X,( 
=•,13,//) 

B« ,E14.8, 2X,  'ALPHA1'  ,E1 


1 


IB 


S  NBAR1' ,//) 
, IA,  IB2 


S  N8AR" ,//) 
IA,  IB 
*WTB+NBAR 


S  IS  BARN11,//) 


218 


X 
X 
X 
X 
X 
X 
X 
X 

X 
X 
X 
X 
X 
X 
X 
X 
X 
X 
X 
X 
X 
X 


6C5 

606 

6CT 

500 
501 

608 
609 
61C 
611 
6  12 
613 

tec 


601 
502 
C.  REME 

C  MAGN 


C  MAGN 


804 
MANU 
15 


17 
16 


-iLTAC 
-.DATA 


NBARl=N  (  I  A 

WRITE(6  ,60 
FCPMATt  •  • 
WRITE(6,50 
NBAR=N<  IA2 
WRITE( 6,60 
FCPMAT{«  « 
WRITE (6,  50 
6ARl\2= (NBA 
W  R  I  T  E  (  6  ,  6  0 
FORMAT (  »  * 

WRITE (6, 50 
NBAR=( BARN 
KRITE( 6,50 
FORMAT  (  •  • 
WRITE (6,  50 
FORMAT {  '  « 
YBARl=Y  (I  A 
W  P  IT  E  (  6  «  6  0 
FCRMAT (  •  « 
WRITE(6,50 
YBAR  =  Y(. 1A, 
WRITE  (t>,60 
FTRMATC  • 
WRITE ( 6,50 
BAPY1=(Y6A 
WRITE(6,61. 
FORMAT (  8  ■ 
WRITE(6,60 
YBAR1  =  Y(  IA 
WRITF(6,6L 
FORMAT ( «  ' 
WRITE(6,50 
YBAR=Y( IA2 
W  R  I  T  E  (  6  , 6  1 
FORMAT (  •  « 
WRITE (6,  50 
BAPY2=( YBA 
WRITE (6, 61 
FCRMAT!  '  ' 
WPITE(6,60 
YBAR=(BARY 
WRITE (6  ,60 
FORMAT( 5  ' 
WRITE(6,60 
FCRMAT ( •  « 
FORMAT (  '  ' 
MBER.  SIMUL 
CIVIDE  BY 
ITUDE  SCAL 
NNAX=4. 195 
NDIM=NBAR* 
NSCAL=NDIM 
ITUDE  SCAL 
YMAX=1.6  08 
YCIM=YBAR* 
YSCAL=YDIM 
CALL  DAC(  1 
AL  DIGITAL 
IF(TESTU) 
CALL  HOLD 
IF(TEST  (1  ) 
CALL  COf-'PU 
IF(TEST (3) 
CALL  RESET 
PAUSE 
GO  TO  L15 
END 
XP,MAP 


2, IB2) 
5) 

,'THIS  I 
2)  NBARl 

> 


6) 

2  ) 


HIS  I 
NBAR, 

R1-N6AR) 

7) 

,'THIS  I 

1)  BARN2 

2-BARNl  J 

0) 

,'THIS  I 

1)  NBAR 

,  10X,E14 
,IB2) 
8) 
,'THIS  I 

2)  YBAR1 
IB) 

9) 

,'THIS  I 
2)  YBAR, 
Rl-YBAR) 
C) 

,'THIS  I 
DBARY1 
2.IB2) 
II 

,'THIS  I 
2)  YBAR1 
,IB  ) 
2) 

,'THIS  I 
2)  YBAR, 
Rl-YBAR) 
3) 

,'THIS  I 
1)  BARY2 
2-BARYL  ) 
0) 

,'THIS  I 
1)  YBAR 
,  1 0  X  ,  E  1 4 
,  10X,E14 
AT  I  ON  I  S 
100.0  SI 
ING  OF  N 
E  +  07 

(9.428E+ 
/NMAX 
ING  OF  Y 
E  +  05 

(  17.87E  + 
/YMAX 

,X01D0Tt 

SWITCH' 

.GT.O)  G 

.LT.O)  G 
TE 

.GT.O)  G 
(1000) 


S  NBARl'  ,//) 
, IA2, IB2 


S  NBAR' ,//) 
IA2,  IB 
-WTB+NBAR 

S  BARN2' ,//) 

*WTA+BARN1 

S  FINAL  NBAR'  ,//) 

.8,//) 


S  YBARl'  ,//) 
, I  A,  IB2 


S  YBAR1 ,//) 
I  A  ,  I  B 
*WTB+YBAR 

S  BARY1' ,//) 


S  YBARl* ,//) 
,IA2,IB2 


S  YBAR" ,//) 
IA2,  IB 
*WTE+YBAR 

S  BARY21  ,//) 

*WTA+BARYl 

S  FINAL  YBAR' ,//) 

.8,//) 

.8,5X,'ROW=« , I3,IX,'C0L=« ,13) 

DONE  IN  COMPUTER  UNITS  SO  NO  NEED  T 
NCE  SUBR.  DAC  CCNVERTS  BY  ITSELF  IN 


10) 


07) 

2,Y01D0T,5,Y0  2D0T,6,X02CCT,7,NSCAL,8 
0«  AND  '  1' 
0  TO  16 

0  TO  17 

0  TO  111 
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-0.  1 

-0.2 

-0.3 

-0.3 

-0.4 

-0.3 

-C.2 

-C.  I 

0.4 

0.2 

0.5 

0.7 

0.8 

C.9 


THIS  IS  Y  ARRAY 


0.6 


-0.2 
-0.5 
-0.6 
-0.5 
-0.  L 


400F- 
4C0E- 
200F- 
8C0E- 
C.U  ';■ 
500E- 
6C0E' 
2C0F- 
0C0F- 
7CCE- 
0  00(5- 
OOOE- 
5C0E- 
OOOfc- 
2C0E- 
250F- 
5C0E- 
CCCE- 
7G0F- 
OCOE- 
OCOE' 
COOE- 
CCOE- 
COOF- 
0005- 


■03-0 

03-0 

•03-0 

03-0 

03-0 

03-0 

■03-0 

03- C 

■04    0 

C3    0 

•03    0 

03    0 

•03    0 

■03    0 

03    0 

C3    0 

■03    0 

03    0 

03  0 

04  0 
04-0 
04-0 
04-C 
04-0 

•04-0 


.1263E- 
.2112E- 
.2762E- 

.3225E- 
.3337F- 
.2870F- 
.2079F- 
.9384E- 
.5507F- 
.25C0E- 
.4507E- 
.6225E- 
.75C0E- 
.7844E- 
.7159E- 
.5579E- 
.4089E- 
.2781E- 


.6822E 

.3562E 

.349 

.4904E 

.4699E 

.2096E 


n„ 


03-0 
03-0 
03-0 
03-0 
03-0 
03-0 
03-0 
04-0 
04  0 
03  0 
03  0 
03  0 
03  0 
03  0 
03  0 
03  0 
03  0 
03  0 

03  0 

04  0 

05  0 
04-C 
04-0 
04-0 
04-0 


.116 
.189 
.243 
.2  79 
.284 
.239 
.168 
.667 
.663 
.236 
.413 
.564 
.675 
.697 
.637 
.507 
.378 
.26  1 
.  165 
.743 
.8  76 
.236 
.408 
.44  7 
.291 


OE-03- 

7E-03- 

3E-0  3- 

3E-03- 

0E-03- 

7E-03- 

9E-03- 

IE-04- 

7E-04 

4E-03 

7E-03 

3E-03 

CE-03 

7E-03 

8E-03 

5E-03 

1E-03 

6E-03 

2E-03 

8E-04 

7E-05 

3  F-04- 

2 E-04- 

3E-04- 

8E-04- 


0,  i 

0.1 

0.2 

0.2 

•0.2 

■0.1 

■0.1 

•0.3 

0.7 

0.2 

0.3 

0.5 

0.6 

0.6 

0.5 

0.4 

0 

'.' 

0 

0 

0 

•0 


■0.3 
0.4 
0.3 


058 
681 
1C4 
362 
342 
925 
299 
9  59 
767 
221 
767 
062 
000 
]  LO 
597 
572 
473 
452 
632 
055 
1  LO 
233 
260 
24  7 
740 


E-03- 

F-03- 

E-03- 

E-03- 

E-03- 

E-03- 

E-03- 

E-04- 

E-04 

E-03 

E-03 

E-0  3 

E-03 

E-03 

E-03 

E-03 

E-03 

E-03 

E-03 

E-04 

E-04 

F-04- 

E-04- 

E-04- 

E-04- 


0.97 
0.15 
0.  18 
0  .20 
0.19 
0.15 
0.98 
0.  17 
0  .86 
0.21 
0.34 
0  .45 
0.54 
0.5  4 
0  .49 
0.41 
0  .32 
0.23 
0.  16 
0  .85 
0.3C 
0.32 
0.26 
0.4C 
0  .43 


53E- 

C8E- 

41F- 

16E- 

45F- 

47E- 

63E- 

89E- 

71E- 

C5E' 

71E- 

96E- 

COE- 

16E- 

73E- 

69E- 

26E- 

21E 

15E- 

481  - 

96E- 

88E- 

0  3  E  ■ 

S7E- 


16 
17 
15 
12 


04-0.90 

03-0.13 

03-0 

■03-0 

03-0 

•03-0 

04-C. 70 

■04  0.20 
0.95 
0.20 
0.32 
0.41 
0.48 
0.47 
C.44 
0.38 
C.30 
0.22 
0.16 
C.90 
0.40 
C.50 
C.20 

04-0.39 

04-C. 50 


04 
■03 
03 
■03 
•03 
■03 
03 
■03 
■03 
■03 
■03 
04 
■04 
•05 
04- 


THIS     IS    N    ARRAY 


0 

0 

0 

0 

0 

0 
-0 
-0 
-0.3C 
-0.4  1 
-0.44 


6C 
11 

13 
15 
14 
70 

5C 


-0 

-0 

-0 

-0 

-0 

0 

C 

0 

0 

0 

0 

0 

0 

0 


43 

3  7 
2! 
15 
45 
42 
11 
14 
13 
12 
10 
lb 

4  5 
9C 


POCC 
P040 
P052 
P025 
P002 
P033 
P004 
P005 
PCCC 
P01C 


COE 
COE 
90F 
30  E 
00! 

00  E 
50E 
OOE 
COF 
2  0  E 
50E 
40E 
OOE 
COE 
COF 
OOE 
COF 
OOF 
2  0E 
COF 
20E 
COE 
COE 
OOF 

0. 

C. 

c. 

0. 
0. 
0. 

c. 

0. 

c. 

0. 


-04    C 

-03    0 

-03    0 

-03    0 

-03    0 

-04    0 

-04-0 

-03-0 

-03-0 

-03-0 

-03-0 

-C3-0 

-03-0 

-03-0 

-03-0 

-03-0 

-04    0 

-03    0 

-03    0 

-03    0 

-03    0 

-03    0 

-04    0 

-04    0 

-05    0 

1511 

1600 

1600 

2860 

0803 

2860 

0404 

0052 

16  60 

2379 


.60C0E- 

.  1036F- 

.12  7- 

.1349E- 

.  U97E- 

.5728E- 

.4618E- 

.L536F- 

.2598E- 

.3528F- 

.3880E- 

.3785F- 

.33  0 

.25  20E- 

.1373F- 

.4373E- 

.3640E- 

.9728F- 

.1247E- 

. 1193E- 

.1060E- 

.8750E- 

•63  55E- 

.3864E- 

•1053E- 


04  0 
03  0 
03  0 
03     0 

03  0 

04  0 
04-0 
03-0 
03-0 
03-0 
03-0 
03-0 
03-0 
03-0 
03-0 
04-0 
04  0 
04  0 
03  0 
03     0 

03  C 

04  0 
04  0 
04  0 
04    0 


.6000E- 
.9786F- 
.1176E- 
.U86E- 
.1012E- 
.4  572E- 
.42  72E- 
.  1342E- 
.2238E- 
.30C8E- 
.3294F- 
.3272E- 
.29C0F- 
.2266E- 
.1257E- 
.4257E- 
.3132F- 
.8572E- 
.1109E- 
.1077E- 
.9329E- 
.7432F- 
.5315F- 
.3286E- 
.1 1  9  1  E- 


04  0 
04  0 
03  0 
03    0 

03  0 

04  0 
04-0 
03-0 

•03-0 

•03-0 

■03-0 

03-0 

0  3-0 

03-0 

03 -C 

■04-0 

04    0 

04    0 

03     0 

03  0 
■04  0 
■0  4  0 
•04     0 

04  0 
•04    0 


.600 
.928 
.108 
.104 
.849 
.356 
.396 
.117 
.191 
.255 
.282 
.282 
.255 
.2  04 
.115 
.415 
.268 
.756 
.987 
.976 
.821 
.627 
.44C 
.278 
.131 


OE-04 

OE-04 

7E-03 

2f;~03 

7F-04 

1E-04 

8E-04- 

2F-03- 

3E-03- 

2F-03- 

4E-03- 

3 E-03- 

CE-03- 

3E-03- 

6F-03- 

6E-04- 

7E-04 

1F-04 

3F-04 

1E-04 

7F-04 

9  E-04 

5E-04 

CF-04 

3E-04 


0  .6 

0.8 


0 
0 
0 
0 
0 
0 
0.1 
■0.2 
0  .2 
0.2 
0.2 
0  .1 
0.  1 
0.4 
0.2 
0  .6 
0.8 
0  .8 


CCO 

890 

C19 

?  C  •' 

249 

780 

7  3  ■'. 

C41 

667 

2CI 

462 

476 

2SC 

872 

078 

C78 

780 
936 
980 
358 
390 
7C2 
35C 
4C6 


E-04 

F-04 

E-03 

F-04 

E-04 

F-04 

E-04- 

F-03- 

E-03' 

F-03- 

E-03- 

E-03' 

E-03- 

F-03- 

E-03- 

E-04- 

E-04 

F-04 

F-04 

E-04 

F-04 

E-04 

E-04 

E-04 

E-04 


0.60 
C.85 
C.95 
0.82 
0.60 
0.20 
.35 
.91 
.14 
.18 
.21 
.21 
.20 
.17 
.10 
.40 
0.20 
C.60 
0.80 
0.82 
C.65 
0.45 
0.30 
C.20 
0.15 
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P01  ] 

0 

.2383 

P012 

C 

.4717 

P013 

0 

.0250 

P015 

0 

.5607 

P016 

c 

.1340 

P020 

0 

.0520 

P021 

0 

,0097 

PC22 

0 

.3576 

P053 

c 

.0905 

P027 

0 

.1750 

P055 

0 

.  I'i97 

P050 

0 

.0337 

P051 

0 

.4380 

P0  56 

0, 

.C092 

P057 

0 

.9  540 

P024 

0, 

.1581 

P054 

c, 

,2860 

P026 

0, 

.(  803 

POOL 

c, 

,1750 

P03G 

c, 

,0404 

P045 

0, 

,0920 

P031 

0. 

.0052 

P023 

c. 

,0905 

P034 

0, 

,  1660 

P0C3 

0, 

,2860 

P046 

0, 

4717 

P032 

0. 

,2379 

P035 

c. 

2383 

P047 

0. 

1497 

P036 

0. 

0097 

P03  7 

c. 

C250 

P041 

0. 

1340 

P043 

0. 

5607 

P044 

c. 

3576 

P0C7 

0. 

0337 

P014 

0, 

0092 

P04  2 

n 

\J   > 

1511 

PCL7 

0, 

1581 

AOOl 

DOOl 

A002 

A003 

DCC3 

A201 

A006 

A0  0  5 

COOS 

AOIO 

AG  14 

A016 

A013 

DC13 

A017 

C017 

AC22 

A203 

A112 

A06C 

A053 

D053 

A2C6 

A200 

A051 

D051 

A057 

D057 

A202 

A035 

C035 

A  0  2  6 

a  027 

C02  7 

21 


A04  4 
A  0  3  A 
A033 
DC33 
A03C 
A036 
AC4L 
DO  4  1. 
AOA3 
D042 
AC42 
A  104 
A052 
A007 
C0C7 
A205 
A2C4 
A065 
C065 
A214 
A06L 
D061 
A211 
A066 
A056 
A02  4 
A2  16 
A213 
A2C7 
A064 
A210 
A212 
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COMPUTER  PROGRAM  VI 


-^JOB 
-iFCR 


C  ST 

I 

1C 


12 

200 


20 
1 


300 


X 
30 
1 

c     s 

1005 

105 
X 
1015 

1025 

125 
X 

103 

20 
X 

2005 
C  WH 

C  TR 
11 

11 

C  RE 


C  IN 
C  RE 


PEAS 

BOTH 

GAL1 

TRAi\ 

REA 

REA 

D  I M 

DIN 

INT 

DAT 

CRAGE 

DC 

0  REA 
C  FCR 

DC 

PEA 

WRI 

FCR 

DC 

IwRI 

FCR 

CON 

WRI 

FCP 

DC 

W  R  I 

1  FCR 
3  CCN 
ECTIO 

REA 
5  FOP 

DC 
5  CAL 

WRI 
5  FCP 

REA 
5  FCR 

CAL 

DC 

CAL 

WRI 
3  FCR 

DC 
0  CAL 

WRI 
5  FCP 
EN  RE 

0  OUT 
ANSFO 
5  CAL 

IFL 

1  CAL 
6Rf  3 

SCALI 
PSI 
PS2 
PSI 
A  =  S 
B  =  C 
XCl 
YC1 
PS2 
A2  = 
E2  = 
XC? 
YC2 

N  E  M  E  E 


E  II 
SHI 
225 
LStG 
L  NM 
L  NB 
ENSI 
ENS  I 
EGER 
A  NO 

OF 
10  J 
D(5, 
MAT( 

12  J 
D(5, 
TE(6 
MAT( 
11J  = 
TE  ( 
MAT  ( 
TJNU 
TE(6 
MAT( 

13  J 
TE(6 
MAT  ( 
TINU 
N  CH 
D(5, 
MAT( 
105 
L  SE 
TE(6 
MAT( 
0(5, 
MAT( 
L  RE 
125 
L  SC 
TE(6 
MAT( 
20  I 
L  SC 
TE(6 
MAT( 
ADY 
PUT( 
RMAT 
L  CO 
AG=0 
L  AD 
,ALP 
NG  0 
MAX= 
MAX  = 
=  PSI 
IN(  P 
OS(P 
DOT  = 
DOT  = 
=  PS2 
SIN( 
COS( 
DOT= 
DOT  = 

l  /  T  T 

R  BE 


.INTERACTION  FORCE  AND  MOMENT  ARE  APPLIED  ON 
PS 

C 

AX,NDIM,NSCAL,NBSCAL 

AR,N,NBAR1 

ON  Y(30,30) ,N(3Q,30) 

CN  POT  AD (70) , POTVAL (70) , AMP AD( 70 ) »  AM PVAL ( 70  ) 

POTADt AMPAD 
/48/ 

NONDIMENSICNAL  ARRAY  FOR  NAND  Y 
=  1,25 

10  0)  (  Y  (  J  ,  I  )  ,  I  =  1 , 6  ) 
6E11.4) 

—  1    2  ^ 

10  0)  (N(J,I),I=1,6) 

,200) 

«  *  ,  'THIS  IS  Y( J, I )',//) 

1,25 

6,201)  ( Y ( J , I )  ,  I  = 1 , 6 ) 

1  •  ,iOX,6( Eli.4,2X),//) 

^300) 

'  •  , "THIS  IS  N( J, I ) • ,//) 

=  1,25 

,301)  (N(J,I),I=1,6) 

•  •  ,10X,6(E11.4,2X),//) 

E 

ECKING  POT  AND  AMP  VALUES  FOR  SHIP  HI    AND  ill 

10C5)  (POTADU  )  ,POTVAL{  I  ),  1  =  1,  NO) 

A4,F10.4) 

1=1, NO 

TPCTC  POTAD(  I ), POTVAL (  I  )  ) 

,1015)  (POTAD(I)  , POTVAL (  I )  ,1  =  1, NO) 

A4,F10.4) 

1025)  (AMPACd  )  ,  1  =  1  ,66) 

A4) 

SET(IOOO) 

1=1,66 

AN ( AMPAD ( I  )  ,AMPVAL( I  )  ) 

,103)  ( AMPAD ( I) ,AMPVAL( I  )  ,  1  =  1,66) 

A4,F10.6) 

=  l,NO 

AN {POT  AD ( I  )  , POTVAL (  I  ) ) 

,20  05)  (POT ADC  I )  , POTVAL ( I  )  ,1=1, NO) 

A4,F10.6) 


101)  'READY' 

ION  OF  COORDINATES  FOR  SHIP  #1  AND 

PPUTE 


#2 


K(0,U1BAR, 1,V1BAR,2,PSIBAR,4,U2BAR,5,V2BAR,6,PS 

BAR) 

F  PSIBAR  AND  PS2BAR 

0.26 

C.  26 

MAX-PSIBAR 

SI) 

SI) 

UieAR*B-VlBAR*A 

U1BAR*A+V1BAR*B 

MAX*PS2BAR 

PS2  ) 

PS2) 

U2BAR*B2-V2BAR*A2 

U2BAR^A2+V2BAR^B2 

Ifvj    2-DT'  Y.PASS     nrT?AD     /\NC     L<  op.AR 

TBAR=1.0    CORRESPONDS    BETA=100.0    FEET* 


22 


c 

c 

X 
X 

c 

X 
X 
X 

X 


ALFB 
A  L  S  C 

401 

402 
RESC 

555 

402 


4  04 


C    SEAR 
C    FIND 


C    ALPH 


C    ALFH 
1 


C    ALFH 
2 


101 
102 

202 
20  3 


602 


602 


604 


A  R  =  1  o  0 

BETBAR 
WRITE(6 
FH-MAK 
WF  ITE(6 
FCPMAK 
AUNG  0 
ALPHA=5 
CCMINU 
W R  IT 
FCPMAK 
WRITE (6 
BETA=10 
W  R  I  t  r  ( 6 
FCPMAK 
WRITF( 6 
I  F(E 
IF(BETA 
IF(ALPH 
IF (ALPH 
CF    FOR 

CORRES 
IB1=B 
IB=IB1- 
BETA1-I 
W7B=(BE 
IF( ALPH 
IF( ALPH 
A  =0 
IA=13 
WTA=0.0 
GC  TO  3 
A  LESS 
I A1=-AL 
ALPHA  1  = 
WTA=-( A 
IA=13-I 
GC  TO  3 
A  GREAT 
IA1=ALP 
1A=13+I 
A  L  P  h  A 1  = 
WTA=( AL 
IE2=IB+ 
IF(  IB.E 
IA2=IA+ 
IF(  IA.E 
WRITE (6 
FCRMAK 
WRITE(6 
FCPMAK 
W  P  I  T  E  (  6 
FCRMAT { 
WRITE (6 
FORMAT ( 
IF( ALPH 
I  F (  IA.E 
IF(WTA. 
IF(WTB. 
NBARL=N 
WRITE (6 
FCRMAT( 
WRITE(6 
KEAR=N( 
WPITE(6 
FORMAT ( 
WRITE (6 
BARM=  ( 
WRITE(6 
I 

W  R  I  T  E  (  6 
R1=N 


CORRE 

AND 
.401) 
'  '  ,1 
,402) 
'  ',1 
F  ALP 
50.  C* 
E 

,403) 
■  «»L 
,501) 
0.0*B 
,404) 
'  '  ,1 
,501) 
.LT.5 
.GT.l 
A.GT. 
A.LT. 
I  NO  El 
PONDE 
A/10. 
4 

B  1  *  1 0 
TA-BE 
A.LT. 
A.GT. 


S PONDS 
ALPBAR 

OX, ' TH 
ALPS  A 
0X,2F1 
HAB/ 
ALPBAR 


ALP HA- 5 50.0  FEET 

ARE  PAST  IN  COMPUTER  UMTS 

IS  TS  ALPBAR-BETEAR' ,// ) 

R,BETBAR 

1.6) 

ALPBAR  AND  BE T A E AR=BET B A P 


OX, 'THIS  IS  ALPHA* , //) 

ALPHA 

ETBAR 


OX, • THIS  IS  BETA' ,//) 

BETA 

0.0)  0 

00.0)0 

550.0) 

-550.0 

IFICAT 

D  Y  AN 

0 


UTPUK 101 )  BETA; NSC AL=O.C;YSCAL=O.C; 
LTPUT(101)BETA;NSCAL=0.0;YSCAL=0.0;G 
OUT  PUT (  LOL) ALPHA;NSCAL  =  C.C; YSCAL  =  C.O 
) OUT  PUT ( 10 1 ) ALPHA; NSC AL  =  0.0 ;YSCAL  =  0. 

ICN  OF  ARRAY  ELEMENT 

D  N  -LINEAR  I  NT  ERPOLAT  I  Cl\  IN  2-DIMEN 


TAD/1 
0.0)  G 
0.0)  G 


0.0 

0  TO  I 
0  TO  2 


THAN  ZERO 

PHA/50.0 

-IA1*50 

LPHA-ALPHA1 

Al 


1/50.0 

AN  ZERO 


ER  TH 

HA/50 

Al 

IA1*5 

PHA-A 

1 

C.6)  IB2=6 

1 

G  .  2  5  ) 

,101) 


.0 

0 

LPHA1 )/50.0 


'  •  ,1 

,102) 

■  «  ,1 

,202) 

«  *  ,' 

,203) 

'  e  ,' 

A.LT. 

Q.l) 

EQ  .0. 

EQ.O. 

(IA,I 

,602) 

1  '  ,» 

,502) 

IA,  IB 

,603) 

'  '  ,' 

,502) 

NBAR1 

,604) 

(IA2, 


,1 

IB 
IA 
IA 


IA2  =  2 
IB1 

OX,  ' 

IA, 
0X,« 

BETA  I 
BETA1' 

WTA 
WTA= ■ , 
0,0)  I 
IA2  =  1 
0) IA2= 
0)  IB2 
B2) 

THIS  I 
NSAR1 
) 

THIS  I 

NBAR, 
-NBAR) 


B,  IB2,IA1 

l=e,I3,5X,,IB=',I3,5X,,Ie2=,,I3,5X,, 

2 

=  • , 13, 5X, ' IA2=«  ,13,// ) 

tWTBf ALPHA1 

, E14.8,2X,  «WTB« , E 14 . 3 , 2X  ,  •  ALPHA  1  •  , E 1 

E14.8,//) 
A2=IA-1 

IA 
=  IB 


S  NBAR1' ,// ) 
,IA,  IB2 


S  NBAR* ,//) 
I  A  ,  I  B 
*WTe+NBAR 


THIS  IS  BARN1' ,//) 
r  '  RN1 
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X 
X 
X 
X 
X 
X 
X 
X 

X 
X 
X 
X 
X 
X 
X 
X 
X 
X 
X 
X 
X 
X 


60 


606 


6C7 


50 

5C 


WP 
PC 
WR 
KB 
WR 
FC 
WP 
BA 
WR 
FO 
WR 
NB 
WR 
FC 
WR 
FG 
YE 
WR 
FO 
WR 
YB 
WR 
FC 
WR 
BA 
WR 
FO 
WR 
YB 
WR 
FO 
WR 
YE 
WR 
FC 
WR 
BA 
WP 
FC 
WR 
YB 
WR 
FO 
WR 

1  FC 

2  FO 
N  E  M  E 
*  CI 

W  R 

5  FC 

GNIT 

M 

NC 

IF 

Ii: 

C  PA GNIT 

YM 

YD 

IF 

IF 

X      W  R 

SCI  FC 

X      WP 

5001  FC 

WR 

FC 

IF 

WR 

FC 

6«  Y 

14  CA 

6C* 


60S 


60S 


61C 


611 


6  1. 


612 


6CC 


60 

50 
C  RE 

X 

5555 
C  MA 


5000 


90 

ec 


0 


ITE(6 
RMATC 
[TEC  6 

AR  =  N< 
ITF(  6 
RMAT  ( 
ITE(6 
RN2=( 
I  T  C  (  6 
RMATC 
I T  E  (  6 
AR=(  B 
ITE(  6 
RMAT( 
I  T  E  (  6 
RMAT( 
AR1=Y 
ITEC6 
RMATC 
ITE(6 
AR=Y( 
ITF(6 
RMATC 
ITE(  6 
RYL=( 
ITEC6 
RMAT( 
ITE(6 
AR1=Y 
ITE(6 

T  ( 
I  TEC  6 
AR=Y( 
ITEC6 
RMATC 
ITEC6 
RY2=( 
ITEC6 
RMATC 
ITEC6 
AR=CB 
I  TEC  6 
RMATC 
J  T  E  C  6 
RMATC 
RMATC 
ER  SI 
VIDE 
ITEC6 

TC 
UDE  S 
AX=4. 
IM  =  NB 
C  IFLA 
(  IFLA 
UDE  S 
AX=l. 
IM  =  YB 
(IFLA 
(IFLA 
1TF  (6 
RMATC 
ITFC6 
RMATC 
ITEC6 
RMAT  ( 
(  IFLA 
ITEC6 
RMAT  C 
BSCAL 

L  ,  8  ,  Y 


605 

•  » 
502 
A2, 
606 

', 

502 

NBAR 

607 

1  t 

501 

ARN2- 

500 

501 

'  5 

IA, 
608 

'  * 
502 
A,  IB 
609 

'  , 

502 

YBAR 

610 

'  » 
60  1 
IA2 
6L1 

•  , 
5  02 
A2f 
612 

i 

502 
BAR 
613 
"  , 
601 


THIS  I 
NBAR  I 
B) 

THIS  I 

NBAR, 

-NBAR) 


S  NBAR1'  ,//) 
,  IA2T  IB2 


S  NBAR' ,//) 

IA2  ,  IB 
-■WTB+NBAR 


THIS  IS  BARN2' ,//) 

BARN  2 
BARN1) 


THIS  I 

NBAR 
OXrElA 
B2) 

THIS  I 
YBAR1 
I 

THIS  I 

YBAR, 

-YBAR) 

THIS  I 

BARY1 

IB2) 

T  H I  S  I 
YBAR1 
B) 

THIS  I 

YBAR, 

-YBAR) 


THIS  I 
BARY2 
ARY2-BARY1) 
600 

601) 

•  a 
8   ■ ,  i 

MULAT 

eY  10 

,5555 
•  '  ,5 
CALIN 

195E  + 
AR*(9 
G.EQ. 

CALIN 
6C8E  + 
AR*C1 
G  .  E  G  . 
G.EQ. 
,901) 


i 

,5001 

,5000 
■  •»•. 

G.EG. 

,900) 
i  i  * 

=  '  ,E1 
C(  l,X 

BSCAL 


THIS  I 

YBAR 
OX, E14 
0X,E14 
ION  IS 
0.0  SI 
5)  IFL 
X,1 IFL 
G  OF  N 
07 

.428E+ 
0 )  NSC 
1  )  N  B  S 
G  OF  Y 
05 
7.87E+ 

0)  YSC 

1)  Y6S 
NDIM, 

NDIM=« 
)  X01D 
X01D0T 
)  X0  2D 
X02DGT 
0)  IFL 
NSCAL 
NSCAL= 
4.6,// 
01D0T, 
) 


*WTA+BARN1 

S  FINAL  NBAR'  ,//) 
.8,//) 


S  YBAR1' ,//) 
, IA, IB2 


S  YBAR' ,//) 
IA,  IB 
*WTB+YBAR 

S  BARY1' ,//) 


S  YBAR1' ,// ) 
,IA2, IB2 


S  YBAR' ,//) 
IA2,  IB 
*WTB+YBAR 

S  BARY2' ,//) 

*WTA+BARYi 

S  FINAL  YBAR' ,//) 


.8,//) 

.  8,5X,'RQW=«  , 13,  IX, 'COL  =  •  ,13) 

DONE  IN  COMPUTER  UNITS  SC  NO  NEED  T 
NCE  SUBR.  DAC  CONVERTS  EY  ITSELF  IN 
AG 
AG=» ,11,//) 


10) 

AL=NDIM/NMAX 
CAL=NDIM/NMAX 


07) 

AL-YDIM/YMAX 

CAL=YDIM/YMAX 

YDIM 

,E14.6,5X, 'YDIF=«,E14.6,//) 

CT,Y01D0T 

=' , E14.6, 'Y01 CCT=' , E14.6,// ) 

0T,Y02D0T 

=  '  , E14.6,  'Y02D0T=' ,E14.6,//) 

AG=l ; ALPHA=-ALPFA;GO    TO    5  55 

,YSCAL,NBSCAL , YBSCAL 

•,E14.6,2X,'YSCAL=',E14.6,2X,'NBSCAL 

) 

2 , YO 1 DOT , 5 , YO  2C0T , 6 , XO  2CCT , 3 , N  SC  AL ,4 
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MANUAL  DIGITAL  SWITCH' 0'  AND 

15  IF(TEST( L)  .GT.OJ  GC  TO  16 
CALL  HOLD 

17  IHTESTU)  .LT.O) 
C£LL  COMPUTE 

16  I F( TEST (3)  .GT.O) 
CALL  RESET(IOOO) 
PAUSE 
GC  TO  115 
END 
XR.MAP 


GC  TO  17 
IFLAG=0;GO  TO  111 


-LCAC 
-DATA 
* 
* 


THIS  IS  Y  ARRAY 


-0 

-0 

-0 

-C 

-0 

-0 

-C.2 

-0.1 
0-4 
0.2 
0.5 
0.7 

o.a 

C.9 
C.8 
0.6 
O.A 


-0.2 
-C.5 
-C.6 
-0.5 
-0.1 

* 

C.6 
0.1 
0.1 
0.  I 

0.  1 


4CCE- 
4G0E- 
2C0F* 
8C0E- 
CCOE- 
5C0E- 
6C0E- 
300E- 
CCCE- 
700E- 
OOOE- 
OOOE- 
5  00E- 
CCCE- 
2C0E- 
250E- 
5CCE- 
OOOE- 
7CCE- 
OCOE- 
OCOE- 
C  0  C  CJ  • 
CCCE- 
COOE- 
CCGE- 


03-0 
■03-0 
■03-0 

03-0 
■03-0 

03-0 
■03-0 
•03-C 

04  0 
■03  0 
■03  0 
•03    0 

03  0 
■03  0 
•03  0 
•03  0 
•03  0 
•03  0 
■03  0 
•04  0 
■04-0 
•04-0 
•04-0 

04-0 
•C4-0 


.1263E-03- 
.2L12E-03- 

.2762E-03- 

.3225E-03- 

.3337E-03- 

.2870E-03- 

.2079F-03- 

.9334E-04- 

•5507E-04 

.25C8E-0  3 

.45  07  E- 03 

.6225E-03 

.7500E-03 

.7844E-03 

.7  159E-03 

.5579E-03 

.4089E-03 

.2781E-03 

.1673E-03 

.6822F-04 

.3562E-05 

.3493E-04- 

.4904E-04- 

.4699E-04- 

•2096E-04- 


0.1160E- 

■0  .1897E- 

•0  .2433E- 

0.2793E- 

0.28-', 

0.2397E- 

.1689E- 

667  1  E- 

6637E- 

2364E- 

0  ,4137c- 

0.5643E- 

0.6750E- 

0.6977E- 

-6378E- 

5075E- 

3781F- 

2616E- 

.1652E- 

743  8E- 

8767E- 

2363E- 

.4082E- 

•0.447  3E- 

■0.29L8E- 


03-0 
03-0 
03-0 
03-0 
03-0 
03-0 
03-0 
04-0 
04  0 
03  0 
03  0 
03    0 


03  0 
03  0 
03  0 
03    0 

03  0 

04  0 

05  0 
04-0 
04-0 
04-0 
04-0 


.1058E- 
.  1681E- 
.2104E- 
.2  36  2E- 
.2342E- 
.1925E- 
.  1299E- 
.39  59E- 
.7767E- 
.2  22  IE- 
.3767E- 
.5  062E- 
.600CE- 
.6U0E- 
.  5  59  7F- 
.4572E- 
.3473E- 
.24  5  2F- 
.1632E- 
.80  5  5E- 
.2110E- 
.1233E- 
.326CE- 
.4247E- 
.3740E- 


03- 
03- 
03- 
03- 
03- 
03- 
03- 
04- 
04 
03 
03 
■03 
03 
■03 
•03 
■03 
■03 
■03 
03 
•04 
•04 
04 
•04- 
•04- 
■04 


0.1 
1 

c 


0 
•0 
0.1 

0.8 
0.2 
0  .3 
0.4 
0.5 
0.5 
0.4 
0  .4 
0.3 
0.2 
0  .1 
O.G 
0.3 
■0 
■C.2 
•0.4 


753E- 
5C8E- 
841E- 
C16E- 
945E- 
547E> 
863E- 
7  89E- 
67  IE- 
1C5E- 

4  7  1  E 

5  96c- 
4C0E- 
4  1 6  E 
9  7  3  E- 
169E- 
22<  ,: 
32 1 E- 

6  1 5  E 
54  8E- 
C96E- 
288E- 
6C3E- 


-0.4397E- 


04-0.90 
•03-0.  13 
03-0.16 
03-0.17 
03-0.  15 
■03-0.12 
04-0.70 
04  0.20 
04  0.95 
03  0.20 
•03  0.32 
•03  0.41 
03  0.48 
■03  0.47 
•03  0.44 
•03  0.38 
03  0.30 

03  0.22 
•03  0.16 

04  0.90 
04  C.40 

•05  0.50 
•04-0.20 
04-0.39 
■04-C.50 


THIS  IS  N  ARRAY 


0.7 

-0.5 

-0.  1 

-0.2 

-0.4 

-0.4 

-0.4 

-0.3 

-0.2 

-0.  I 

-C.4 

0.4 

0.  1 

0.  1 

C.  1 

0.1 


CCOE- 
1C0E- 
290E- 
530F- 
400E- 
CCOF- 
COOE- 
75CE- 
CQOE- 
100E- 
420E- 
350E- 
74  0E- 
800E- 
500E- 
500E- 
200P- 
LOOE- 
4C0E- 

2C0E- 


04 
03 
03 
03 
03 
04 


.6CC0E- 
.  1036F- 
.1278E- 
.1349F- 
.  1197E- 
.5728F- 
.4618E- 
.L536E- 
.2598E- 
•  3528E- 
.3880E- 
.3785F- 
.33C0E- 
.2520E- 
.1373E- 
.43  73E- 
.3640E- 
.9728E- 
.1247E- 
i  i  < 


04-0 
03-0 
03- 0 
03-0 
03-0 
C3-0 
03-0 
03-0 
03-0 
•03-0 
04  0 
•03  0 
■03  0 
■03  0 
•03    0.10c 


0  4  C 
03  0 
03  0 
03    0 

03  0 

04  0 
04-0 
03-0 
03-0 
03-0 
03-0 
03-0 
03-0 
03-0 
03-0 
04-0 
04  0 
04  0 
03     0 

0 
03    0 


.6OC0E- 

.9786E- 

.1176E- 

. 1186E- 

.1012E- 

.4572E- 

.4272E- 

.1342E- 

.2238E- 

.30C8E- 

.3294E- 

.3272E- 

.29C0E- 

.2266E- 

.1257E- 

.4257E- 

.3132E- 

.3572r- 

.I109E- 

. L077c~ 

.9329E- 


04  0 
04  0 
03  0 
03    0 

03  0 

04  0 
04-0 
03-0 
03-0 
03-0 
03-0 
03-0 
03-0 
03-0 
03-0 
04-0 
04  0 
04  0 
03    0 

03  0 

04  0 


.6CCCE- 

.9280E- 

.1087E- 

.  1042E- 

.  8497E- 

.3561E- 

.3968E- 

.1172E- 

.  19  13E- 

.2552E- 

.2824E- 

.2822E- 

.2550E- 

.2043E- 

.  1  156E- 

.4156E- 

.2687E- 

.7561E- 

.9873E- 

.8217E- 


■04 
04 
03 
•03 
04 
•04 
■04- 
03- 
03- 


7 

2 
3 
1 

I 

0.2 

0  .2 

-03-0.2 


0.6 

0.8 

0.1 

C 

0 

0 

0 

0 

0 


03 
03 
03 
03 
03 
03 
04 
04 
04 
04 
04 
04 


OOOE- 
890E- 
019E- 
2C8E- 
249E- 
780E- 
724E- 
0 1\  1  E  • 
6  67E- 
2C1E- 
462E- 
4  76F- 
280E- 
872E- 
C78E- 
078E' 
242E- 
780E- 
936E- 

■a  cqc. 


0.7  2  58E- 


04  0.60 
04    0.85 

03  0.95 

04  0.82 
04  0.60 
04  0.20 
04-0.35 
03-C. 91 
03-0.14 
03-C. 18 
03-0.21 
03-0.21 
03-0.20 
03-0.17 
03-0.10 
04-0.40 
04  0.20 
04  C.fO 
04  O.dO 
CM    (     ■ 

04    0 
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0.  1C20 

E-03 

0.7500E-04 

0.45 

CO 

E-04 

0.90 

COf-05 

P040 

0 

.  1600 

P052 

c 

.1600 

P000 

0 

.1511 

P025 

0 

.2860 

PCC2 

c 

.0803 

PC33 

c 

.2860 

P004 

c 

.0404 

P0C5 

Q 

.C052 

P0C6 

6 

.  1.660 

P010 

0 

.2379 

PCll 

c 

.2383 

P012 

0 

.4717 

P013 

0 

.0250 

P015 

0 

.5607 

P016 

0 

.1340 

PC2C 

0 

.C920 

P021 

0 

»C097 

P022 

0 

.3576 

P052 

c 

»C905 

P027 

0 

.1750 

P055 

0, 

.1497 

P050 

c 

.0337 

P051 

0 

.4  380 

P0  5  6 

0, 

,0092 

P057 

c. 

.9540 

P024 

0, 

.1581 

P054 

0, 

■  2860 

P02  6 

c, 

.C803 

P001 

0  , 

.1750 

P03C 

0. 

.0404 

P045 

c, 

.0920 

P03  1 

0  , 

>0052 

P023 

0. 

.090  5 

P034 

0. 

,  1660 

P003 

0. 

,2860 

P04  6 

0, 

4717 

P032 

0, 

.2379 

P035 

0. 

.2383 

PC4  7 

0. 

1497 

P036 

0. 

.C097 

P037 

0. 

.0250 

P041 

0. 

1340 

P043 

c, 

.5607 

P044 

0. 

3576 

PC07 

0. 

C337 

POL  4 

0. 

X092 

P042 

0. 

1511 

P017 

0. 

1581 

AOOL 

D001 

A0C2 

A003 

D003 

A201 

A  006 

A005 

D005 

A010 

A014 

A016 

AC12 

D013 

AC  17 

D017 

A022 

A203 

A112 

A060 

0.8750E-04 
0  ,6355':-04 
0  .3864E-04 
0.1053E-04 


0.7432 E-04 
0  .5315E-04 
0  .3286E-04 
0.U91E-04 


0.6279E-04 
0.44C5E-04 
0  .2 78  0 E-04 
0.1313E— 04 


0.5390E 
0.37C2E- 
0  .2  290E- 
0.14C6E- 


04  0.45 
04  0.30 
04  C.20 
04  0.15 
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A  0  5  2 

C053 

A206 

A2C0 

A05  I 

D051 

A057 

C057 

A202 

A035 

D035 

A026 

AC27 

C027 

A044 

A034 

A033 

D033 

A03C 

A036 

A041 

DC4  1 

A0A3 

D043 

A042 

A  10^ 

A052 

AGO  7 

D007 

A205 

A204 

A  0  6  5 

C065 

A214 

A061 

C06i 

A211 

A  06  6 

A056 

A  02  4 

A216 

A2i3 

A207 

A064 

A210 

A2L2 
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COMPUTER  PROGRAM  VI  I 


-ij 


Ph 

CB  GA 

CRTRA 
R 
R 
D 
D 
I 
C 

STCRA 

D 

10 

ICO 


12 

200 


201 
11 

300 


3C1 

12 

SECT 

R 

005  F 

D 

105  C 


01 
02 


125 

102 
2C 


:oo5 

WHEN 
20  0 

TRANS 

115:  C 
I 

111  C 
6R 

RESCA 
P 
P 
F 
A 
E 
X 
V 
P 
A 
B 
X 
Y 

INTER 

p 

ALPBA 


ASE  II 
L1225 
N  LS,G 
EAL  NM 
EAL  NB 
I^ENSI 
I  MENS  I 
NTEGER 
ATA  NO 
GE  OF 
C  10  J 
EAD( 5, 
CPMAT( 
C  12  J 
EAD(5, 
RITE(6 
CRMAT( 
0  11  J  = 
RITE  ( 
CRMAK 
CNT1NU 
PITE(6 
CRMAT( 
C  13  J 
RITE(6 
AT  ( 
ONTINU 
ICN  CH 
EAD(5r 
ORMAT( 
C  10  5 
ALL  SE 
RITE (6 
CRMAK 
EAD(5, 
CPMAT { 
ALL  RE 
C  125 
ALL  SC 
PITE{6 
OPMAT( 
C  20  I 
ALL  SC 
RITE(6 
ORMATC 
READY 
UTPUTt 
FORMAT 
ALL  CO 
FLAG=0 
ALL  AO 
,3, ALP 
Llf\G  0 
SIMAX= 
S2MAX= 
SI=PSI 
=  S  I  N  {  P 
=C0S(P 
C1D0T= 
01D0T= 
S2=PS2 
2=SIN( 
2=C0S( 
C2D0T= 
C2DGT= 
PCLATI 

R  =  l  .0 


.MANUAL  CONTROL  IS  APPLIED 


AX,NDIM,NSCAL,NBSCAL 

AR,N,NBARi 

CN  Y(30,30) ,N(30,30) 

CN  POTADJ70)  ,POTVAL(  70)  ,  AM  PAD  (70)  ,  AMPVAL (70) 

POTADtAMPAC 
M8/ 

NONDIMENS IONAL  ARRAY  FOR  NAND  Y 
=  1,25 

IOC)  { Y( J , I ) ,1=1,6) 
6E11.4) 
=  1,25 

100)  (N( J, I  ),I  =  i,6) 
,200) 

'  •  ,'THTS  IS  Y{ J,I )  E  ,//) 
1  ,25 

6,201)  ( Y ( J , I ) , I  =  1 , 6 ) 
1  s  ,10X,6(EU.4,2X)  ,//) 
E 

,300) 

«  ■  ,'THIS  IS  N(J,1  )  !  ,//) 
=  1,25 

,301)  (N( J,  I  J  ,  1  =  1,6) 
*  •  ,10X,6( E11.4,2X) ,//) 
E 

ECKING  POT  AND  AMP  VALUES  FOR  SHIP  til    AND  #2 
1005)  (POT  AD  (I  )  ,  POT  V  ALU  )  ,1  =  1,  NO) 
A4,F10.4) 
1=1 -NO 

TPOT(POTAD( I ) ,PCTVAL(  I  )  ) 
,10  15  1  ( POT AD ( I  )  ,POTVAL(  I  )  ,I^1,N0) 
A4,F10.4) 

1025)  (AMPAD(I  )  ,1  =  1,66) 
A4) 

SET(IOOO) 
1=1,66 

AM ( AM  PAD ( I  ) , AMPVAL ( I  )  ) 
,103)  (  AMPACU  )  ,  AMPVAL  (I  )  ,1  =  1,66) 
A4,F10.6) 
=  1,N0 

AN(POTAD(  I  )  ,POTVAL(  I  )  ) 
,2005)(P0TAD(I) ,POTVAL( I  )  ,1  =  1, NO) 
A4,F10.6) 


101)  'READY' 

ION    OF    COQRCINATES    FOR    SHIP    til    AND 

MPUTE 


H  2 


K(0,U1BAR,1,V1BAR,2,PSIBAR,4,U2BAR,5,V2BAR,6,PS 

BAR) 

F  PSIBAR  ANC  PS2BAR 

0.26 

0.26 

MAX*PSIBAR 

SI) 

SI  ) 

U1BAR*B-V1BAR*A 

LliiAR*A+VlBAR*B 

MAX*PS2BAR 

PS2) 

PS2) 

U2BAR*B2-V2BAR*A2 

U2BAR*A2+V2BAR*B2 

IN  2-DIM.  ARRAY. PASS  BETBAR  ANC  ALPBAR 

CORRESPONDS  ALPHA=550.0  FEET 
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C  ALSO 
X 

401 
X 

C  RESC 


5  5  5 
402 

404 


C  SEAR 
C  FIND 


C  ALP!-! 


C  ALPH 
1 


C  ALPH 
2 


101 


202 
202 


6C2 


60 


6C4 


BETBAR 
U  R  I  T  E  (  6 
FORMAT ( 
Vi  R  I  T  E  (  6 
'AT( 
ALING  0 
ALPHA=5 
CCMINU 
\\RITE(6 
I  I  ■'  A  T  ( 
V»PITE(6 
BETA=10 
W  R I T  E  ( 6 
F0PMAT( 
WRITE( 6 
IP(BETA 
IFtBETA 
IFl ALPH 
IF( ALPH 
Ch  FOR 

CORRES 
IE1---BET 
IB=IB1- 
BETAL=I 
WTBMBE 
IF( ALPH 
IF (ALPH 
A  =0 
IA=13 
WTA=0.0 
GC  TO  3 
A  LESS 
I A1=-AL 
AIPHA1= 
WTA=-( A 
IA=13-I 
GC  TO  3 
A  GREAT 
IA1=ALP 
I  A=  13+-I 
ALPHAL= 
WTA=< AL 
I  E2  =  I B  + 
IF(  IB.E 
IA2=IA+ 
IF(  IA.E 
k  PI"  TEC  6 
FCRf-';AT( 
WRITE (6 
FCRMATC 
WRITE(6 
FORMAT ( 
fcRITE( 6 
FGPMAT( 
IF( ALPH 
IF(  IA.E 
IF(WTA. 
IF(WTB. 
NBARl=N 
VvPITE  (6 
FCRNATC 
WRITE (6 
NBAR=N( 
l\RITE(6 
FORMAT ( 
k  P  I  T  E  (  6 
BAPN1=( 
W  P  I  T  E  (  6 
FORMAT! 

Vt  P  II  :  (6 

p  ]  =  m 

VE(6 


AND 
,401 

•  '  , 

,402 

f-  AL 
50. C 
E 
,403 

•  '  , 
,501 
0.0* 
,404 
«  «  , 

,501 
.LT. 

.GT. 

A.GT 

A.LT 

INDE 

POND 

A/10 

4 

BL*i 

TA-B 

A.!  T 

A.GT 


ALPBAR  ARE  PAST  IN  COMPUTER  UMTS 


IS  IS  ALPBAR-BETBAR' ,// } 

R, BETBAR 

1.6) 

ALPBAR  AND  BET  A E AR=BET B AR 


) 

10X, ' TH 
)  ALPBA 
L0X.2F1 

PHA3AR= 
*ALPBAR 

) 

10X, 'THIS  IS  ALPHA' ,//) 

)ALPHA 

BETBAR 

) 

10X, ' THIS  IS  BETA* ,//  ) 

)BETA 

50.0)  B 

100.0) 

.550.0) 

.-550.0 

TIFICAT 

ED  Y  AN 

.0 


ETA=50.0 
BETA=100.0 

ALPHA=550.0 
)  ALPHA=-550.0 
ICN  OP  ARRAY  ELEMENT 
D  N  -LINEAR  INTERPOLATION  IN  2-DIMEN 


0 
ETAD/1 

.0.0)  G 
.0.0)  G 


0.0 

0  TO  1 
0  TO  2 


THAN  ZERO 

PHA/50.0 

-IAl*50 

LPHA-ALPHAi 

Al 


HAN  ZER 
iO.O 


ER  T 

FA/5 

Al 

I  A  1  * 

PHA- 

1 

Qc6) 

1 

Q.25)  I A  2  =  2  5 

,101 


J/50.0 

0 


50 

ALPHA1 )/50.0 


IB2  =  6 


,102 

,202 

•  •  , 

,203 

•  ■  , 

A  .  L  T 
G.l) 

EQ.O 
EO.O 
(IA, 
,6  02 

•  '  , 
,502 
IA,  I 
,6  03 

I   c 

,502 
NBAR 
,604 
'  '  , 
,501 
(IA2 


tl 
IB 
I  A 
I  A 


60  5) 


)  IB1 
10X,  « 
)  IA, 
10X,  ' 
)  BETA1 
' BETA1 » 
)  WTA 
•WTA=«  , 
.0.0)  I 

IA2=1 
.0)IA2= 
.0) 
IB2) 
) 

«  THI 
)  NBAP.l 
B) 
) 

•THIS  I 
)  NBAR. 
1-NBAR) 
) 

•THIS  I 
)  BARN1 

IB2) 


IB2 


S  I 


B,IB2,IAl 

1='  ,  I3,5X,« IB=» ,I3,5X,  •  IB 2='  ,  13, 5X,' 

2 

=',I3,5X,tIA2=,tI3,//) 

,WTB, ALPHA  1 

iEL4.8t2XtlWTB,TE14.8,2Xt,ALPHAlSEl 

E14.8,//) 

A2=IA-1 

IA 
=  IB 


S  NBAR11  ,//) 
,IA, IB2 


S  NBAR' ,//) 
IA,  IB 
*V,TB  +  NBAR 

S  BARN1' ,//) 
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X 


I 

1A2 
,61 

<    V 

50 


605  FORMAT (  •  • 
WRITE(6,50 
NBAR  =  N{  I  A?. 
WPITE(6,60 

606  FORMAT (  "  ' 
WRITE( 6,50 
BARN2= (NBA 
l*RITE(6,60 
FORMAT ( «  ' 
URITE(6 t50 
N3AR=( BARN 
WRITE (6,50 
FORMAT (•  • 
WRITE( 6,50 
FORMAT (  '  • 
YBAR1=Y(IA 

X  WRITE (6  ,60 
FORMAT («  • 
WRITE (6,50 
YEARLY (  I  A, 
V,PITE(6  ,60 
FORMAT (  •  « 
WRITE (6,  50 
BARYl=(YBA 
W  R I T  E  ( 6  , 6 1 
FOPMAT('  c 
WRITE(6,60 
YBAR1=Y(IA 
WPITE(6,61 
FORMAT ( 
W R IT E  (  6 
YEAR=Y{ 
WRITE (6 
FORMAT ( 
W  R I T  E  (  6 
BARY2=(YBA 
WRITE (6,61 
FORMAT( >  « 
WRITE (6, 60 
YBAR=( BARY 
URITE(6,60 
FORMAT ( '  • 
WRITE (6 
F0RMAT( 
FORMAT ( «  ' 
0  REMEMBER  SIMUL 
C****  DIVIDE  BY 
X  WRITE (6, 55 
55555  F0RMAT(  ■  ' 
C  MAGNITUDE  SCAL 
f\MAX  =  4. 195 
NDIM=NBAR* 
IF(  IFLAG.E 
IFdFLAG.E 
C  MAGNITUDE  SCAL 
Y.MAX=1.608 
YDIM=YBAR* 
IFdFLAG.E 
IF(  IFLAG.E 
X      WRITE(6,90 

90  1  FORMAT ( 

X      WPITE(6 

5C01  FCRMAT( 

X      W  R  I T  E  (  6 

50C0  FCRMAT( 

IF(  IFLAG.E 

X      WRITE (6,90 

9CC  FORMAT («  • 

6'YBSCAL-' , 

804  C£LL  DAC(1 

6  C  fi  L  ,  8 ,  Y 

C  MANUAL  DIG] 


607 


50C 
501 


6  08 


609 


610 


611 


612 


613 


60C 

601 

50  2 


,'THIS  I 
2)  NBAR1 
,IB  ) 
6) 

,'THIS  I 
2)  NBAR, 
Rl-NBAR) 
7) 

,'THIS  I 
1)  BARN2 
2-BARN1) 
0) 
,'THIS  I 

1)  NBAR 
,10X, E14 
,IB2) 

8) 
,'THIS  I 

2)  YBARl 
IB) 

9) 

,'THIS  I 

2)  YBAR, 

Rl-YBAR) 

0) 

,'THIS 

1JBARY1 

2, IB2) 

1) 

,'THIS 


S  NBAR  I '  , 
, IA2, IB2 


S  NBAR1,/ 
IA2,  IB 
>,;WTB  +  NBAR 

S  BARN2' , 

*WTA+BARN 

S  FINAL  N 

.8, //  ) 


//) 


/) 


S  YBARl' , 
,IA, IB2 


//) 

1 

BAR' ,//> 

//) 


S  YBAR' ,/ 
IA,  IB 
*WTe+YBAR 


/) 


IS  BARY1' ,//) 


,60 
i  t. 


2)  YBARl 

,IB) 

2) 

,'THIS  I 
2)  YBAR, 
Rl-YBAR) 
3) 

,'THIS  I 
1)  BARY2 
2-BARY1  ) 
C) 

,'THIS  I 
1)  YBAR 
,  1 0  X  ,  E  1 4 
, 10X, E14 
AT  I  ON  IS 
100.0  SI 
55  5)  IFL 


N 


50 
t 

50 
i 


ING  OF 
E  +  07 
(9.428E+ 

Q.O)  NSC 
C.l)  NBS 
ING  OF  Y 
E  +  05 

(17.87E+ 
Q.O)  YSC 
0.1)  YBS 
1)  NDIM, 
,  »NDIM=« 
01)  X  0  1 D 
,'XOIDGT 
00)  X02D 
,'X02D0T 
Q.O)  IFL 
0)  NSCAL 
»' NSCAL= 
E14.6,// 
,X01D0T, 

S  ;■.'  I  T  C  H  B 


S  YBARl' , 
,  IA2,IB2 


S  YBAR' ,/ 
I-A2,  IB 
*WTB+YBAR 

S  BARY2'  , 

*WTA+BARY 

S  FINAL  Y 

.0,//) 

.8,5X,'R0 

DONE  IN 
NCE  SUBR. 
AG 
AG  =  «  ,11,/ 


//) 


/) 


1C) 

AL=NDIM/N 
CAL=NDIM/ 


//) 

1 

BAR' ,//) 


W=« ,  13,  IX, 'COL=' ,13) 

COMPUTER  UNITS  SO  NO  NEEC  T 
DAC  CONVERTS  BV  ITSELF  IN 


/) 


MAX 
NMAX 


07) 

AL  =  Y 

CAL  = 

YD  I  M 

,EL4 

CT,Y 

=  '  ,E 

OT,Y 

=  '  ,E 

AG=1 

,YSC 

■  ,E1 

) 

2, YO 1  DOT, 5, YO 2  COT, 6, XO 2  COT, 3, NSCAL,  4 

0«  AND  «1» 


DIM/Y 
YDIM/ 

.6,  5X 

01D0T 
14.6, 
02D0T 
14.6, 
;ALPH 
AL,NB 
4.6,2 


MAX 
YMAX 

, * YDIM=« ,E14.6,//) 

• Y01D0T=»  ,E14.6,//  ) 

'Y02DCT=» ,E14.6,//  ) 
A=-ALPHA;GO  TO  555 
SCAL,YBS'CAL 
X,'YSCAL=',E14.6,2X,'NBSCAL 
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15 
17 
16 


-.DATA 


1F(TEST(1)  .C-T.O) 

CALL    HOLD 

II- (TEST  (1)  .LT.O) 

CALL    COMPUTE 

IF (TEST (3)  .GT.O) 

CALL  RESET(IOOO) 

PAUSE 

GC  TO  115 

END 

XRtMAP 


GC  TO  16 
GC  TO  17 
IFLAG=0;GO  TO  111 


THIS  IS  Y  ARRAY 


-0. 
-0. 
-0. 
-0. 
-0. 
-0. 
-0. 
-0. 

0. 

0. 

0. 

0. 

0. 

0. 

0. 

0. 

0. 

0. 

C. 

0. 

-c 

-0. 

-0. 
-0. 
-0. 


1400F 
24C0E 

2200E 
3800E 
4CC0E 
3500E 
26CCE 
13C0E 
40CCE 
2  7  C  0  E 

5  C  0  0  F 
7000E 

6  5  C  C  E 
9C00E 
8  2C0E 
6250E 
4  5C0E 
3000E 
17CCE 
600CE 
2  C  C  C  E 
5000E 
6CC0E 
5C00E 
1CC0E 


-03-0 
-03-0 
-03-0 
-03-0 
-03-0 
-03-0 
-03-0 
-03-C 
-04  0 
-03  C 
-03  0 
-03  0 
-03  0 
-03  0 
-03  0 
-03  0 
-03  0 
-03  0 
-03  0 
-04  0 
-04-0 
-04-0 
-04-0 
-04-0 
-04-0 


.1263 
.2112 
.2762 
.3225 
.3337 
.2870 
.2  079 
.9384 
.5507 
.25  C8 
.4507 
.6225 
.7500 
.7844 
.'7159 
.5579 
.4089 
.2781 
.16  73 
.6322 
.3562 
.3493 
.49  04 
.4699 
.2096 


E-03- 

E-03- 

E-03- 

E-03- 

E-03- 

E-03- 

E-03- 

E-04- 

E-04 

E-03 

E-03 

E-03 

E-0  3 

E-03 

E-03 

E-03 

E-03 

E-03 

E-03 

E-04 

E-05 

E-04- 

F-04- 

E-04- 

E-04- 


1160 

L897 


.2793 
2840 
2397 
1689 
6671 
0  .6637 
0.2364 
0.4  137 
0.5643 
0.6750 
0  .6977 
0.6378 
0.5075 
0.3  78  1 
0  .2616 
0  o  j.  6  5  2 
0.7438 
0.8767 
0.2363 
0  .4082 
■0.4473 
■0.2918 


E-03- 

E-03- 

E-03- 

E-03- 

E-03- 

E-03- 

E-03- 

E-04- 

E-04 

E-03 

E-03 

E-03 

E-03 

E-03 

E-03 

E-03 

E-03 

E-03 

E-03 

E-04 

E-05 

E-04- 

E-04- 

E-04 

E-04- 


■0.1058 

•0.1681 

C.21C4 

•0.2362 

•0.2342 

1925 

1299 

3959 

7767 

0.2221 

0.3767 

0.5062 

0.60CC 

0.611C 

0.5597 

0.4572 

0.3473 

2  452 

16  2  2 

8  0  5  5 

2  110 

.12  3  3 

•0.3260 

0.4247 

•0.3  74  0 


E-03- 

E-03- 

E-03- 

E-03- 

E-03- 

E-03- 

E-03- 

E-04- 

E-04 

E-03 

E-03 

E-03 

E-03 

E-03 

E-03 

E-03 

E-03 

E-03 

E-03 

E-04 

E-04 

E-04- 

E-04- 

E-04- 

E-04- 


0.9 
0  .1 
0.  I 
0  .2 
0.1 
0.1 
0  .9 
0.1 
0.8 
0.2 
0.3 
0  .4 
0.5 
0.5 
0 
0 
0 
0 
0 
0.8 
0  .3 
C.3 
•0  .2 
■0.4 
•0.4 


753E- 

5C8E- 

841E- 

C16E- 

945E- 

547E- 

8  6  3E- 

789E- 

671E- 

1C5E- 

471E- 

596E- 

4C0E 

4  16E- 

973E- 

169E- 

2  26E- 

321E 

A    1    C  ft  . 

548E- 

C56E 

288E- 

602E- 

C65E- 

297E- 


■04-C.90 
-03-0.  13 
•03-0.16 
-03-C. 17 
-03-0.15 
-03-0.12 
-04-0.70 
-04  0.20 
-04  0.95 
-03  0.20 
-03  0.32 
-03  0.41 
-03  0  .48 
-03  0.47 
-03  C.44 
-0  3  0.38 
-03  C.30 
-03- 0.22 
-03  0.16 
-04  0.90 
-04  0.40 
-05  0.50 
-04-C.20 
-04-0.39 
-04-G.50 


THIS     IS    N    ARRAY 


0.6 
0.  1 
0.  1 

0.  I 


•0.4 

■0.  4 

0 

■0, 
■0 
■  0 

■c 

0 


0.  I 
0.  1 
0.  1. 
0.  1 
0.  i 


0C0E- 
1C0E- 

530E- 

4CCE- 
CCOE- 
000F- 
75CE' 
000E- 
]  COE- 

42(  E- 

250E- 

74(  E- 

8C0E- 

5C0F 

5C0E- 

200F- 

1C0E 

400E 

220E 

0  C  C  c 

(  -   - 


04  0 
03  0 
-03  0 
-03  0 
-03  0 
-04  0 
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